Theorem grpoidinv 30527

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 482	. . . . . . . 8 ⊢ (((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → (𝑢𝐺𝑧) = 𝑧)
2	1	ralimi 3083	. . . . . . 7 ⊢ (∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
3		oveq2 7439	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → (𝑢𝐺𝑧) = (𝑢𝐺𝑥))
4		id 22	. . . . . . . . 9 ⊢ (𝑧 = 𝑥 → 𝑧 = 𝑥)
5	3, 4	eqeq12d 2753	. . . . . . . 8 ⊢ (𝑧 = 𝑥 → ((𝑢𝐺𝑧) = 𝑧 ↔ (𝑢𝐺𝑥) = 𝑥))
6	5	rspccva 3621	. . . . . . 7 ⊢ ((∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
7	2, 6	sylan 580	. . . . . 6 ⊢ ((∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
8	7	adantll 714	. . . . 5 ⊢ (((𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
9	8	adantll 714	. . . 4 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝑢𝐺𝑥) = 𝑥)
10		simpl 482	. . . . . . 7 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) → 𝐺 ∈ GrpOp)
11	10	anim1i 615	. . . . . 6 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝐺 ∈ GrpOp ∧ 𝑥 ∈ 𝑋))
12		id 22	. . . . . . . . . 10 ⊢ ((𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋) → (𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋))
13	12	adantrr 717	. . . . . . . . 9 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) → (𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋))
14	13	adantr 480	. . . . . . . 8 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋))
15	2	adantl 481	. . . . . . . . 9 ⊢ ((𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) → ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
16	15	ad2antlr 727	. . . . . . . 8 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
17		simpr 484	. . . . . . . . . . 11 ⊢ (((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
18	17	ralimi 3083	. . . . . . . . . 10 ⊢ (∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢) → ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
19	18	adantl 481	. . . . . . . . 9 ⊢ ((𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) → ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
20	19	ad2antlr 727	. . . . . . . 8 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
21	14, 16, 20	jca32 515	. . . . . . 7 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ((𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋) ∧ (∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ∧ ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)))
22		grpfo.1	. . . . . . . 8 ⊢ 𝑋 = ran 𝐺
23		biid 261	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ↔ ∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧)
24		biid 261	. . . . . . . 8 ⊢ (∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢 ↔ ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)
25	22, 23, 24	grpoidinvlem3 30525	. . . . . . 7 ⊢ ((((𝐺 ∈ GrpOp ∧ 𝑢 ∈ 𝑋) ∧ (∀𝑧 ∈ 𝑋 (𝑢𝐺𝑧) = 𝑧 ∧ ∀𝑧 ∈ 𝑋 ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢)) ∧ 𝑥 ∈ 𝑋) → ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢))
26	21, 25	sylancom 588	. . . . . 6 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢))
27	22	grpoidinvlem4 30526	. . . . . 6 ⊢ (((𝐺 ∈ GrpOp ∧ 𝑥 ∈ 𝑋) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)) → (𝑥𝐺𝑢) = (𝑢𝐺𝑥))
28	11, 26, 27	syl2anc 584	. . . . 5 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝑥𝐺𝑢) = (𝑢𝐺𝑥))
29	28, 9	eqtrd 2777	. . . 4 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (𝑥𝐺𝑢) = 𝑥)
30	9, 29, 26	jca31 514	. . 3 ⊢ (((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) ∧ 𝑥 ∈ 𝑋) → (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))
31	30	ralrimiva 3146	. 2 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑢 ∈ 𝑋 ∧ ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))) → ∀𝑥 ∈ 𝑋 (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))
32	22	grpolidinv 30520	. 2 ⊢ (𝐺 ∈ GrpOp → ∃𝑢 ∈ 𝑋 ∀𝑧 ∈ 𝑋 ((𝑢𝐺𝑧) = 𝑧 ∧ ∃𝑤 ∈ 𝑋 (𝑤𝐺𝑧) = 𝑢))
33	31, 32	reximddv 3171	1 ⊢ (𝐺 ∈ GrpOp → ∃𝑢 ∈ 𝑋 ∀𝑥 ∈ 𝑋 (((𝑢𝐺𝑥) = 𝑥 ∧ (𝑥𝐺𝑢) = 𝑥) ∧ ∃𝑦 ∈ 𝑋 ((𝑦𝐺𝑥) = 𝑢 ∧ (𝑥𝐺𝑦) = 𝑢)))

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1540   ∈ wcel 2108  ∀wral 3061  ∃wrex 3070  ran crn 5686  (class class class)co 7431  GrpOpcgr 30508

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-sep 5296  ax-nul 5306  ax-pr 5432  ax-un 7755

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3437  df-v 3482  df-sbc 3789  df-csb 3900  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-nul 4334  df-if 4526  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-iun 4993  df-br 5144  df-opab 5206  df-mpt 5226  df-id 5578  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-fo 6567  df-fv 6569  df-ov 7434  df-grpo 30512

This theorem is referenced by:  grpoideu  30528  grpoidval  30532  grpoidinv2  30534  grpomndo  37882