ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  isoini GIF version

Theorem isoini 5813
Description: Isomorphisms preserve initial segments. Proposition 6.31(2) of [TakeutiZaring] p. 33. (Contributed by NM, 20-Apr-2004.)
Assertion
Ref Expression
isoini ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝐻 “ (𝐴 ∩ (𝑅 “ {𝐷}))) = (𝐵 ∩ (𝑆 “ {(𝐻𝐷)})))

Proof of Theorem isoini
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dfima2 4968 . 2 (𝐻 “ (𝐴 ∩ (𝑅 “ {𝐷}))) = {𝑦 ∣ ∃𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷}))𝑥𝐻𝑦}
2 elin 3318 . . . 4 (𝑦 ∈ (𝐵 ∩ (𝑆 “ {(𝐻𝐷)})) ↔ (𝑦𝐵𝑦 ∈ (𝑆 “ {(𝐻𝐷)})))
3 isof1o 5802 . . . . . . . . 9 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → 𝐻:𝐴1-1-onto𝐵)
4 f1ofo 5464 . . . . . . . . 9 (𝐻:𝐴1-1-onto𝐵𝐻:𝐴onto𝐵)
5 forn 5437 . . . . . . . . . 10 (𝐻:𝐴onto𝐵 → ran 𝐻 = 𝐵)
65eleq2d 2247 . . . . . . . . 9 (𝐻:𝐴onto𝐵 → (𝑦 ∈ ran 𝐻𝑦𝐵))
73, 4, 63syl 17 . . . . . . . 8 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑦 ∈ ran 𝐻𝑦𝐵))
8 f1ofn 5458 . . . . . . . . 9 (𝐻:𝐴1-1-onto𝐵𝐻 Fn 𝐴)
9 fvelrnb 5559 . . . . . . . . 9 (𝐻 Fn 𝐴 → (𝑦 ∈ ran 𝐻 ↔ ∃𝑥𝐴 (𝐻𝑥) = 𝑦))
103, 8, 93syl 17 . . . . . . . 8 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑦 ∈ ran 𝐻 ↔ ∃𝑥𝐴 (𝐻𝑥) = 𝑦))
117, 10bitr3d 190 . . . . . . 7 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑦𝐵 ↔ ∃𝑥𝐴 (𝐻𝑥) = 𝑦))
1211adantr 276 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝑦𝐵 ↔ ∃𝑥𝐴 (𝐻𝑥) = 𝑦))
133, 8syl 14 . . . . . . . 8 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → 𝐻 Fn 𝐴)
1413anim1i 340 . . . . . . 7 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝐻 Fn 𝐴𝐷𝐴))
15 funfvex 5528 . . . . . . . 8 ((Fun 𝐻𝐷 ∈ dom 𝐻) → (𝐻𝐷) ∈ V)
1615funfni 5312 . . . . . . 7 ((𝐻 Fn 𝐴𝐷𝐴) → (𝐻𝐷) ∈ V)
17 vex 2740 . . . . . . . 8 𝑦 ∈ V
1817eliniseg 4994 . . . . . . 7 ((𝐻𝐷) ∈ V → (𝑦 ∈ (𝑆 “ {(𝐻𝐷)}) ↔ 𝑦𝑆(𝐻𝐷)))
1914, 16, 183syl 17 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝑦 ∈ (𝑆 “ {(𝐻𝐷)}) ↔ 𝑦𝑆(𝐻𝐷)))
2012, 19anbi12d 473 . . . . 5 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → ((𝑦𝐵𝑦 ∈ (𝑆 “ {(𝐻𝐷)})) ↔ (∃𝑥𝐴 (𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷))))
21 elin 3318 . . . . . . . . . . . 12 (𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷})) ↔ (𝑥𝐴𝑥 ∈ (𝑅 “ {𝐷})))
22 vex 2740 . . . . . . . . . . . . . 14 𝑥 ∈ V
2322eliniseg 4994 . . . . . . . . . . . . 13 (𝐷𝐴 → (𝑥 ∈ (𝑅 “ {𝐷}) ↔ 𝑥𝑅𝐷))
2423anbi2d 464 . . . . . . . . . . . 12 (𝐷𝐴 → ((𝑥𝐴𝑥 ∈ (𝑅 “ {𝐷})) ↔ (𝑥𝐴𝑥𝑅𝐷)))
2521, 24bitrid 192 . . . . . . . . . . 11 (𝐷𝐴 → (𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷})) ↔ (𝑥𝐴𝑥𝑅𝐷)))
2625anbi1d 465 . . . . . . . . . 10 (𝐷𝐴 → ((𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷})) ∧ 𝑥𝐻𝑦) ↔ ((𝑥𝐴𝑥𝑅𝐷) ∧ 𝑥𝐻𝑦)))
27 anass 401 . . . . . . . . . 10 (((𝑥𝐴𝑥𝑅𝐷) ∧ 𝑥𝐻𝑦) ↔ (𝑥𝐴 ∧ (𝑥𝑅𝐷𝑥𝐻𝑦)))
2826, 27bitrdi 196 . . . . . . . . 9 (𝐷𝐴 → ((𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷})) ∧ 𝑥𝐻𝑦) ↔ (𝑥𝐴 ∧ (𝑥𝑅𝐷𝑥𝐻𝑦))))
2928adantl 277 . . . . . . . 8 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → ((𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷})) ∧ 𝑥𝐻𝑦) ↔ (𝑥𝐴 ∧ (𝑥𝑅𝐷𝑥𝐻𝑦))))
30 isorel 5803 . . . . . . . . . . . . . 14 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑥𝐴𝐷𝐴)) → (𝑥𝑅𝐷 ↔ (𝐻𝑥)𝑆(𝐻𝐷)))
31 fnbrfvb 5552 . . . . . . . . . . . . . . . . 17 ((𝐻 Fn 𝐴𝑥𝐴) → ((𝐻𝑥) = 𝑦𝑥𝐻𝑦))
3231bicomd 141 . . . . . . . . . . . . . . . 16 ((𝐻 Fn 𝐴𝑥𝐴) → (𝑥𝐻𝑦 ↔ (𝐻𝑥) = 𝑦))
3313, 32sylan 283 . . . . . . . . . . . . . . 15 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝑥𝐴) → (𝑥𝐻𝑦 ↔ (𝐻𝑥) = 𝑦))
3433adantrr 479 . . . . . . . . . . . . . 14 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑥𝐴𝐷𝐴)) → (𝑥𝐻𝑦 ↔ (𝐻𝑥) = 𝑦))
3530, 34anbi12d 473 . . . . . . . . . . . . 13 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑥𝐴𝐷𝐴)) → ((𝑥𝑅𝐷𝑥𝐻𝑦) ↔ ((𝐻𝑥)𝑆(𝐻𝐷) ∧ (𝐻𝑥) = 𝑦)))
36 ancom 266 . . . . . . . . . . . . . 14 (((𝐻𝑥)𝑆(𝐻𝐷) ∧ (𝐻𝑥) = 𝑦) ↔ ((𝐻𝑥) = 𝑦 ∧ (𝐻𝑥)𝑆(𝐻𝐷)))
37 breq1 4003 . . . . . . . . . . . . . . 15 ((𝐻𝑥) = 𝑦 → ((𝐻𝑥)𝑆(𝐻𝐷) ↔ 𝑦𝑆(𝐻𝐷)))
3837pm5.32i 454 . . . . . . . . . . . . . 14 (((𝐻𝑥) = 𝑦 ∧ (𝐻𝑥)𝑆(𝐻𝐷)) ↔ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)))
3936, 38bitri 184 . . . . . . . . . . . . 13 (((𝐻𝑥)𝑆(𝐻𝐷) ∧ (𝐻𝑥) = 𝑦) ↔ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)))
4035, 39bitrdi 196 . . . . . . . . . . . 12 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑥𝐴𝐷𝐴)) → ((𝑥𝑅𝐷𝑥𝐻𝑦) ↔ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷))))
4140exp32 365 . . . . . . . . . . 11 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑥𝐴 → (𝐷𝐴 → ((𝑥𝑅𝐷𝑥𝐻𝑦) ↔ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷))))))
4241com23 78 . . . . . . . . . 10 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝐷𝐴 → (𝑥𝐴 → ((𝑥𝑅𝐷𝑥𝐻𝑦) ↔ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷))))))
4342imp 124 . . . . . . . . 9 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝑥𝐴 → ((𝑥𝑅𝐷𝑥𝐻𝑦) ↔ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)))))
4443pm5.32d 450 . . . . . . . 8 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → ((𝑥𝐴 ∧ (𝑥𝑅𝐷𝑥𝐻𝑦)) ↔ (𝑥𝐴 ∧ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)))))
4529, 44bitrd 188 . . . . . . 7 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → ((𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷})) ∧ 𝑥𝐻𝑦) ↔ (𝑥𝐴 ∧ ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)))))
4645rexbidv2 2480 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (∃𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷}))𝑥𝐻𝑦 ↔ ∃𝑥𝐴 ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷))))
47 r19.41v 2633 . . . . . 6 (∃𝑥𝐴 ((𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)) ↔ (∃𝑥𝐴 (𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷)))
4846, 47bitrdi 196 . . . . 5 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (∃𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷}))𝑥𝐻𝑦 ↔ (∃𝑥𝐴 (𝐻𝑥) = 𝑦𝑦𝑆(𝐻𝐷))))
4920, 48bitr4d 191 . . . 4 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → ((𝑦𝐵𝑦 ∈ (𝑆 “ {(𝐻𝐷)})) ↔ ∃𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷}))𝑥𝐻𝑦))
502, 49bitrid 192 . . 3 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝑦 ∈ (𝐵 ∩ (𝑆 “ {(𝐻𝐷)})) ↔ ∃𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷}))𝑥𝐻𝑦))
5150abbi2dv 2296 . 2 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝐵 ∩ (𝑆 “ {(𝐻𝐷)})) = {𝑦 ∣ ∃𝑥 ∈ (𝐴 ∩ (𝑅 “ {𝐷}))𝑥𝐻𝑦})
521, 51eqtr4id 2229 1 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ 𝐷𝐴) → (𝐻 “ (𝐴 ∩ (𝑅 “ {𝐷}))) = (𝐵 ∩ (𝑆 “ {(𝐻𝐷)})))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105   = wceq 1353  wcel 2148  {cab 2163  wrex 2456  Vcvv 2737  cin 3128  {csn 3591   class class class wbr 4000  ccnv 4622  ran crn 4624  cima 4626   Fn wfn 5207  ontowfo 5210  1-1-ontowf1o 5211  cfv 5212   Isom wiso 5213
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-14 2151  ax-ext 2159  ax-sep 4118  ax-pow 4171  ax-pr 4206
This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ral 2460  df-rex 2461  df-v 2739  df-sbc 2963  df-un 3133  df-in 3135  df-ss 3142  df-pw 3576  df-sn 3597  df-pr 3598  df-op 3600  df-uni 3808  df-br 4001  df-opab 4062  df-mpt 4063  df-id 4290  df-xp 4629  df-rel 4630  df-cnv 4631  df-co 4632  df-dm 4633  df-rn 4634  df-res 4635  df-ima 4636  df-iota 5174  df-fun 5214  df-fn 5215  df-f 5216  df-f1 5217  df-fo 5218  df-f1o 5219  df-fv 5220  df-isom 5221
This theorem is referenced by:  isoini2  5814  isoselem  5815
  Copyright terms: Public domain W3C validator