Theorem islmim 21194

Description: An isomorphism of left modules is a bijective homomorphism. (Contributed by Stefan O'Rear, 21-Jan-2015.)

Hypotheses

Ref	Expression
islmim.b	⊢ 𝐵 = (Base‘𝑅)
islmim.c	⊢ 𝐶 = (Base‘𝑆)

Assertion

Ref	Expression
islmim	⊢ (𝐹 ∈ (𝑅 LMIso 𝑆) ↔ (𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶))

Proof of Theorem islmim

Dummy variables 𝑎 𝑏 𝑐 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-lmim 21155	. . 3 ⊢ LMIso = (𝑎 ∈ LMod, 𝑏 ∈ LMod ↦ {𝑐 ∈ (𝑎 LMHom 𝑏) ∣ 𝑐:(Base‘𝑎)–1-1-onto→(Base‘𝑏)})
2		ovex 7445	. . . 4 ⊢ (𝑎 LMHom 𝑏) ∈ V
3	2	rabex 5308	. . 3 ⊢ {𝑐 ∈ (𝑎 LMHom 𝑏) ∣ 𝑐:(Base‘𝑎)–1-1-onto→(Base‘𝑏)} ∈ V
4		oveq12 7421	. . . 4 ⊢ ((𝑎 = 𝑅 ∧ 𝑏 = 𝑆) → (𝑎 LMHom 𝑏) = (𝑅 LMHom 𝑆))
5		fveq2 6881	. . . . . 6 ⊢ (𝑎 = 𝑅 → (Base‘𝑎) = (Base‘𝑅))
6		islmim.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝑅)
7	5, 6	eqtr4di 2815	. . . . 5 ⊢ (𝑎 = 𝑅 → (Base‘𝑎) = 𝐵)
8		fveq2 6881	. . . . . 6 ⊢ (𝑏 = 𝑆 → (Base‘𝑏) = (Base‘𝑆))
9		islmim.c	. . . . . 6 ⊢ 𝐶 = (Base‘𝑆)
10	8, 9	eqtr4di 2815	. . . . 5 ⊢ (𝑏 = 𝑆 → (Base‘𝑏) = 𝐶)
11		f1oeq23 6811	. . . . 5 ⊢ (((Base‘𝑎) = 𝐵 ∧ (Base‘𝑏) = 𝐶) → (𝑐:(Base‘𝑎)–1-1-onto→(Base‘𝑏) ↔ 𝑐:𝐵–1-1-onto→𝐶))
12	7, 10, 11	syl2an 607	. . . 4 ⊢ ((𝑎 = 𝑅 ∧ 𝑏 = 𝑆) → (𝑐:(Base‘𝑎)–1-1-onto→(Base‘𝑏) ↔ 𝑐:𝐵–1-1-onto→𝐶))
13	4, 12	rabeqbidv 3433	. . 3 ⊢ ((𝑎 = 𝑅 ∧ 𝑏 = 𝑆) → {𝑐 ∈ (𝑎 LMHom 𝑏) ∣ 𝑐:(Base‘𝑎)–1-1-onto→(Base‘𝑏)} = {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶})
14	1, 3, 13	elovmpo 7657	. 2 ⊢ (𝐹 ∈ (𝑅 LMIso 𝑆) ↔ (𝑅 ∈ LMod ∧ 𝑆 ∈ LMod ∧ 𝐹 ∈ {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶}))
15		df-3an 1104	. 2 ⊢ ((𝑅 ∈ LMod ∧ 𝑆 ∈ LMod ∧ 𝐹 ∈ {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶}) ↔ ((𝑅 ∈ LMod ∧ 𝑆 ∈ LMod) ∧ 𝐹 ∈ {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶}))
16		f1oeq1 6808	. . . . 5 ⊢ (𝑐 = 𝐹 → (𝑐:𝐵–1-1-onto→𝐶 ↔ 𝐹:𝐵–1-1-onto→𝐶))
17	16	elrab 3649	. . . 4 ⊢ (𝐹 ∈ {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶} ↔ (𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶))
18	17	anbi2i 634	. . 3 ⊢ (((𝑅 ∈ LMod ∧ 𝑆 ∈ LMod) ∧ 𝐹 ∈ {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶}) ↔ ((𝑅 ∈ LMod ∧ 𝑆 ∈ LMod) ∧ (𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶)))
19		lmhmlmod1 21165	. . . . . 6 ⊢ (𝐹 ∈ (𝑅 LMHom 𝑆) → 𝑅 ∈ LMod)
20		lmhmlmod2 21164	. . . . . 6 ⊢ (𝐹 ∈ (𝑅 LMHom 𝑆) → 𝑆 ∈ LMod)
21	19, 20	jca 520	. . . . 5 ⊢ (𝐹 ∈ (𝑅 LMHom 𝑆) → (𝑅 ∈ LMod ∧ 𝑆 ∈ LMod))
22	21	adantr 485	. . . 4 ⊢ ((𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶) → (𝑅 ∈ LMod ∧ 𝑆 ∈ LMod))
23	22	pm4.71ri 569	. . 3 ⊢ ((𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶) ↔ ((𝑅 ∈ LMod ∧ 𝑆 ∈ LMod) ∧ (𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶)))
24	18, 23	bitr4i 281	. 2 ⊢ (((𝑅 ∈ LMod ∧ 𝑆 ∈ LMod) ∧ 𝐹 ∈ {𝑐 ∈ (𝑅 LMHom 𝑆) ∣ 𝑐:𝐵–1-1-onto→𝐶}) ↔ (𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶))
25	14, 15, 24	3bitri 300	1 ⊢ (𝐹 ∈ (𝑅 LMIso 𝑆) ↔ (𝐹 ∈ (𝑅 LMHom 𝑆) ∧ 𝐹:𝐵–1-1-onto→𝐶))

This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 400   ∧ w3a 1102   = wceq 1569   ∈ wcel 2142  {crab 3415  –1-1-onto→wf1o 6535  ‘cfv 6536  (class class class)co 7412  Basecbs 17275  LModclmod 20992   LMHom clmhm 21151   LMIso clmim 21152

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-sep 5256  ax-nul 5268  ax-pr 5403

This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-rab 3416  df-v 3456  df-sbc 3744  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-br 5109  df-opab 5173  df-id 5555  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-ov 7415  df-oprab 7416  df-mpo 7417  df-lmhm 21154  df-lmim 21155

This theorem is used by:  lmimf1o  21195  lmimlmhm  21196  islmim2  21198  indlcim  22001  lmimco  22005  lmhmqusker  33735  dimkerim  34026  frlmsnic  43336  pwssplit4  43844