Theorem eqgval 19090

Description: Value of the subgroup left coset equivalence relation. (Contributed by Mario Carneiro, 15-Jan-2015.) (Revised by Mario Carneiro, 14-Jun-2015.)

Hypotheses

Ref	Expression
eqgval.x	⊢ 𝑋 = (Base‘𝐺)
eqgval.n	⊢ 𝑁 = (invg‘𝐺)
eqgval.p	⊢ + = (+g‘𝐺)
eqgval.r	⊢ 𝑅 = (𝐺 ~QG 𝑆)

Assertion

Ref	Expression
eqgval	⊢ ((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) → (𝐴𝑅𝐵 ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)))

Proof of Theorem eqgval

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqgval.x	. . . 4 ⊢ 𝑋 = (Base‘𝐺)
2		eqgval.n	. . . 4 ⊢ 𝑁 = (invg‘𝐺)
3		eqgval.p	. . . 4 ⊢ + = (+g‘𝐺)
4		eqgval.r	. . . 4 ⊢ 𝑅 = (𝐺 ~QG 𝑆)
5	1, 2, 3, 4	eqgfval 19089	. . 3 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) → 𝑅 = {⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)})
6	5	breqd 5102	. 2 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) → (𝐴𝑅𝐵 ↔ 𝐴{⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)}𝐵))
7		brabv 5506	. . . 4 ⊢ (𝐴{⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)}𝐵 → (𝐴 ∈ V ∧ 𝐵 ∈ V))
8	7	adantl 481	. . 3 ⊢ (((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) ∧ 𝐴{⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)}𝐵) → (𝐴 ∈ V ∧ 𝐵 ∈ V))
9		simpr1 1195	. . . . 5 ⊢ (((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)) → 𝐴 ∈ 𝑋)
10	9	elexd 3460	. . . 4 ⊢ (((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)) → 𝐴 ∈ V)
11		simpr2 1196	. . . . 5 ⊢ (((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)) → 𝐵 ∈ 𝑋)
12	11	elexd 3460	. . . 4 ⊢ (((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)) → 𝐵 ∈ V)
13	10, 12	jca 511	. . 3 ⊢ (((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) ∧ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)) → (𝐴 ∈ V ∧ 𝐵 ∈ V))
14		vex 3440	. . . . . . . 8 ⊢ 𝑥 ∈ V
15		vex 3440	. . . . . . . 8 ⊢ 𝑦 ∈ V
16	14, 15	prss 4772	. . . . . . 7 ⊢ ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ↔ {𝑥, 𝑦} ⊆ 𝑋)
17		eleq1 2819	. . . . . . . 8 ⊢ (𝑥 = 𝐴 → (𝑥 ∈ 𝑋 ↔ 𝐴 ∈ 𝑋))
18		eleq1 2819	. . . . . . . 8 ⊢ (𝑦 = 𝐵 → (𝑦 ∈ 𝑋 ↔ 𝐵 ∈ 𝑋))
19	17, 18	bi2anan9 638	. . . . . . 7 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → ((𝑥 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋)))
20	16, 19	bitr3id 285	. . . . . 6 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → ({𝑥, 𝑦} ⊆ 𝑋 ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋)))
21		fveq2 6822	. . . . . . . 8 ⊢ (𝑥 = 𝐴 → (𝑁‘𝑥) = (𝑁‘𝐴))
22		id 22	. . . . . . . 8 ⊢ (𝑦 = 𝐵 → 𝑦 = 𝐵)
23	21, 22	oveqan12d 7365	. . . . . . 7 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → ((𝑁‘𝑥) + 𝑦) = ((𝑁‘𝐴) + 𝐵))
24	23	eleq1d 2816	. . . . . 6 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (((𝑁‘𝑥) + 𝑦) ∈ 𝑆 ↔ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆))
25	20, 24	anbi12d 632	. . . . 5 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆) ↔ ((𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)))
26		df-3an 1088	. . . . 5 ⊢ ((𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆) ↔ ((𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋) ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆))
27	25, 26	bitr4di 289	. . . 4 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆) ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)))
28		eqid 2731	. . . 4 ⊢ {⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)} = {⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)}
29	27, 28	brabga 5474	. . 3 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) → (𝐴{⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)}𝐵 ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)))
30	8, 13, 29	pm5.21nd 801	. 2 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) → (𝐴{⟨𝑥, 𝑦⟩ ∣ ({𝑥, 𝑦} ⊆ 𝑋 ∧ ((𝑁‘𝑥) + 𝑦) ∈ 𝑆)}𝐵 ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)))
31	6, 30	bitrd 279	1 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝑆 ⊆ 𝑋) → (𝐴𝑅𝐵 ↔ (𝐴 ∈ 𝑋 ∧ 𝐵 ∈ 𝑋 ∧ ((𝑁‘𝐴) + 𝐵) ∈ 𝑆)))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1541   ∈ wcel 2111  Vcvv 3436   ⊆ wss 3902  {cpr 4578   class class class wbr 5091  {copab 5153  ‘cfv 6481  (class class class)co 7346  Basecbs 17120  +_gcplusg 17161  inv_gcminusg 18847   ~_QG cqg 19035

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-sep 5234  ax-nul 5244  ax-pow 5303  ax-pr 5370  ax-un 7668

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-ral 3048  df-rex 3057  df-rab 3396  df-v 3438  df-sbc 3742  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-nul 4284  df-if 4476  df-pw 4552  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-br 5092  df-opab 5154  df-id 5511  df-xp 5622  df-rel 5623  df-cnv 5624  df-co 5625  df-dm 5626  df-iota 6437  df-fun 6483  df-fv 6489  df-ov 7349  df-oprab 7350  df-mpo 7351  df-eqg 19038

This theorem is referenced by:  eqger  19091  eqglact  19092  eqgid  19093  eqgcpbl  19095  ghmqusnsglem1  19193  ghmquskerlem1  19196  gastacos  19223  orbstafun  19224  sylow2blem1  19533  sylow2blem3  19535  eqgabl  19747  tgpconncompeqg  24028  tgpconncomp  24029  qustgpopn  24036  qusker  33312  eqgvscpbl  33313  qusxpid  33326  nsgqusf1olem3  33378  qsnzr  33418  qsdrngilem  33457  qsdrnglem2  33459