Theorem grpoidinv 28279

Description: A group has a left and right identity element, and every member has a left and right inverse. (Contributed by NM, 14-Oct-2006.) (New usage is discouraged.)

Hypothesis

Ref	Expression
grpfo.1	⊢ 𝑋 = ran 𝐺

Assertion

Ref	Expression
grpoidinv	⊢ (𝐺 ∈ GrpOp → ∃𝑢 ∈ 𝑋 ∀𝑥 ∈ 𝑋 (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))

Distinct variable groups:   𝑥,𝑦,𝑢,𝐺   𝑢,𝑋,𝑥,𝑦

Proof of Theorem grpoidinv

Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl 485	. . . . . . . 8 ⊢ (((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → (𝑢𝐺𝑧) = 𝑧)
2	1	ralimi 3160	. . . . . . 7 ⊢ (∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
3		oveq2 7158	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → (𝑢𝐺𝑧) = (𝑢𝐺𝑥))
4		id 22	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → 𝑧 = 𝑥)
5	3, 4	eqeq12d 2837	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → ((𝑢𝐺𝑧) = 𝑧 ↔ (𝑢𝐺𝑥) = 𝑥))
6	5	rspccva 3621	. . . . . . 7 ⊢ ((∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
7	2, 6	sylan 582	. . . . . 6 ⊢ ((∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
8	7	adantll 712	. . . . 5 ⊢ (((𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
9	8	adantll 712	. . . 4 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
10		simpl 485	. . . . . . 7 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) → 𝐺 ∈ GrpOp)
11	10	anim1i 616	. . . . . 6 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝐺 ∈ GrpOp ∧ 𝑥 ∈ 𝑋))
12		id 22	. . . . . . . . . 10 ⊢ ((𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋) → (𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋))
13	12	adantrr 715	. . . . . . . . 9 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) → (𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋))
14	13	adantr 483	. . . . . . . 8 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋))
15	2	adantl 484	. . . . . . . . 9 ⊢ ((𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) → ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
16	15	ad2antlr 725	. . . . . . . 8 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
17		simpr 487	. . . . . . . . . . 11 ⊢ (((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
18	17	ralimi 3160	. . . . . . . . . 10 ⊢ (∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
19	18	adantl 484	. . . . . . . . 9 ⊢ ((𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) → ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
20	19	ad2antlr 725	. . . . . . . 8 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
21	14, 16, 20	jca32 518	. . . . . . 7 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ((𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋) ∧ (∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ∧ ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)))
22		grpfo.1	. . . . . . . 8 ⊢ 𝑋 = ran 𝐺
23		biid 263	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ↔ ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
24		biid 263	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢 ↔ ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
25	22, 23, 24	grpoidinvlem3 28277	. . . . . . 7 ⊢ ((((𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋) ∧ (∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ∧ ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) ∧ 𝑥 ∈ 𝑋) → ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢))
26	21, 25	sylancom 590	. . . . . 6 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢))
27	22	grpoidinvlem4 28278	. . . . . 6 ⊢ (((𝐺 ∈ GrpOp ∧ 𝑥 ∈ 𝑋) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)) → (𝑥𝐺𝑢) = (𝑢𝐺𝑥))
28	11, 26, 27	syl2anc 586	. . . . 5 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝑥𝐺𝑢) = (𝑢𝐺𝑥))
29	28, 9	eqtrd 2856	. . . 4 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝑥𝐺𝑢) = 𝑥)
30	9, 29, 26	jca31 517	. . 3 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))
31	30	ralrimiva 3182	. 2 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) → ∀𝑥 ∈ 𝑋 (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))
32	22	grpolidinv 28272	. 2 ⊢ (𝐺 ∈ GrpOp → ∃𝑢 ∈ 𝑋 ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))
33	31, 32	reximddv 3275	1 ⊢ (𝐺 ∈ GrpOp → ∃𝑢 ∈ 𝑋 ∀𝑥 ∈ 𝑋 (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))

Syntax hints:   → wi 4   ∧ wa 398   = wceq 1533   ∈ wcel 2110  ∀wral 3138  ∃wrex 3139  ran crn 5550  (class class class)co 7150  GrpOpcgr 28260

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5195  ax-nul 5202  ax-pr 5321  ax-un 7455

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-nul 4291  df-if 4467  df-sn 4561  df-pr 4563  df-op 4567  df-uni 4832  df-iun 4913  df-br 5059  df-opab 5121  df-mpt 5139  df-id 5454  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-fo 6355  df-fv 6357  df-ov 7153  df-grpo 28264

This theorem is referenced by:  grpoideu  28280  grpoidval  28284  grpoidinv2  28286  grpomndo  35147