MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  isismt Structured version   Visualization version   GIF version

Theorem isismt 28289
Description: Property of being an isometry. Compare with isismty 37180. (Contributed by Thierry Arnoux, 13-Dec-2019.)
Hypotheses
Ref Expression
isismt.b 𝐡 = (Baseβ€˜πΊ)
isismt.p 𝑃 = (Baseβ€˜π»)
isismt.d 𝐷 = (distβ€˜πΊ)
isismt.m βˆ’ = (distβ€˜π»)
Assertion
Ref Expression
isismt ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ π‘Š) β†’ (𝐹 ∈ (𝐺Ismt𝐻) ↔ (𝐹:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘))))
Distinct variable groups:   𝐡,π‘Ž,𝑏   𝐹,π‘Ž,𝑏   𝐺,π‘Ž,𝑏   𝐻,π‘Ž,𝑏
Allowed substitution hints:   𝐷(π‘Ž,𝑏)   𝑃(π‘Ž,𝑏)   βˆ’ (π‘Ž,𝑏)   𝑉(π‘Ž,𝑏)   π‘Š(π‘Ž,𝑏)

Proof of Theorem isismt
Dummy variables 𝑓 𝑔 β„Ž are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elex 3487 . . . 4 (𝐺 ∈ 𝑉 β†’ 𝐺 ∈ V)
2 elex 3487 . . . 4 (𝐻 ∈ π‘Š β†’ 𝐻 ∈ V)
3 fveq2 6884 . . . . . . . . 9 (𝑔 = 𝐺 β†’ (Baseβ€˜π‘”) = (Baseβ€˜πΊ))
4 isismt.b . . . . . . . . 9 𝐡 = (Baseβ€˜πΊ)
53, 4eqtr4di 2784 . . . . . . . 8 (𝑔 = 𝐺 β†’ (Baseβ€˜π‘”) = 𝐡)
65f1oeq2d 6822 . . . . . . 7 (𝑔 = 𝐺 β†’ (𝑓:(Baseβ€˜π‘”)–1-1-ontoβ†’(Baseβ€˜β„Ž) ↔ 𝑓:𝐡–1-1-ontoβ†’(Baseβ€˜β„Ž)))
7 fveq2 6884 . . . . . . . . . . . 12 (𝑔 = 𝐺 β†’ (distβ€˜π‘”) = (distβ€˜πΊ))
8 isismt.d . . . . . . . . . . . 12 𝐷 = (distβ€˜πΊ)
97, 8eqtr4di 2784 . . . . . . . . . . 11 (𝑔 = 𝐺 β†’ (distβ€˜π‘”) = 𝐷)
109oveqd 7421 . . . . . . . . . 10 (𝑔 = 𝐺 β†’ (π‘Ž(distβ€˜π‘”)𝑏) = (π‘Žπ·π‘))
1110eqeq2d 2737 . . . . . . . . 9 (𝑔 = 𝐺 β†’ (((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Ž(distβ€˜π‘”)𝑏) ↔ ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘)))
125, 11raleqbidv 3336 . . . . . . . 8 (𝑔 = 𝐺 β†’ (βˆ€π‘ ∈ (Baseβ€˜π‘”)((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Ž(distβ€˜π‘”)𝑏) ↔ βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘)))
135, 12raleqbidv 3336 . . . . . . 7 (𝑔 = 𝐺 β†’ (βˆ€π‘Ž ∈ (Baseβ€˜π‘”)βˆ€π‘ ∈ (Baseβ€˜π‘”)((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Ž(distβ€˜π‘”)𝑏) ↔ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘)))
146, 13anbi12d 630 . . . . . 6 (𝑔 = 𝐺 β†’ ((𝑓:(Baseβ€˜π‘”)–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ (Baseβ€˜π‘”)βˆ€π‘ ∈ (Baseβ€˜π‘”)((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Ž(distβ€˜π‘”)𝑏)) ↔ (𝑓:𝐡–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘))))
1514abbidv 2795 . . . . 5 (𝑔 = 𝐺 β†’ {𝑓 ∣ (𝑓:(Baseβ€˜π‘”)–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ (Baseβ€˜π‘”)βˆ€π‘ ∈ (Baseβ€˜π‘”)((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Ž(distβ€˜π‘”)𝑏))} = {𝑓 ∣ (𝑓:𝐡–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘))})
16 fveq2 6884 . . . . . . . . 9 (β„Ž = 𝐻 β†’ (Baseβ€˜β„Ž) = (Baseβ€˜π»))
17 isismt.p . . . . . . . . 9 𝑃 = (Baseβ€˜π»)
1816, 17eqtr4di 2784 . . . . . . . 8 (β„Ž = 𝐻 β†’ (Baseβ€˜β„Ž) = 𝑃)
1918f1oeq3d 6823 . . . . . . 7 (β„Ž = 𝐻 β†’ (𝑓:𝐡–1-1-ontoβ†’(Baseβ€˜β„Ž) ↔ 𝑓:𝐡–1-1-onto→𝑃))
20 fveq2 6884 . . . . . . . . . . 11 (β„Ž = 𝐻 β†’ (distβ€˜β„Ž) = (distβ€˜π»))
21 isismt.m . . . . . . . . . . 11 βˆ’ = (distβ€˜π»)
2220, 21eqtr4di 2784 . . . . . . . . . 10 (β„Ž = 𝐻 β†’ (distβ€˜β„Ž) = βˆ’ )
2322oveqd 7421 . . . . . . . . 9 (β„Ž = 𝐻 β†’ ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)))
2423eqeq1d 2728 . . . . . . . 8 (β„Ž = 𝐻 β†’ (((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘) ↔ ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘)))
25242ralbidv 3212 . . . . . . 7 (β„Ž = 𝐻 β†’ (βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘) ↔ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘)))
2619, 25anbi12d 630 . . . . . 6 (β„Ž = 𝐻 β†’ ((𝑓:𝐡–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘)) ↔ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))))
2726abbidv 2795 . . . . 5 (β„Ž = 𝐻 β†’ {𝑓 ∣ (𝑓:𝐡–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Žπ·π‘))} = {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))})
28 df-ismt 28288 . . . . 5 Ismt = (𝑔 ∈ V, β„Ž ∈ V ↦ {𝑓 ∣ (𝑓:(Baseβ€˜π‘”)–1-1-ontoβ†’(Baseβ€˜β„Ž) ∧ βˆ€π‘Ž ∈ (Baseβ€˜π‘”)βˆ€π‘ ∈ (Baseβ€˜π‘”)((π‘“β€˜π‘Ž)(distβ€˜β„Ž)(π‘“β€˜π‘)) = (π‘Ž(distβ€˜π‘”)𝑏))})
29 ovex 7437 . . . . . 6 (𝑃 ↑m 𝐡) ∈ V
30 f1of 6826 . . . . . . . . 9 (𝑓:𝐡–1-1-onto→𝑃 β†’ 𝑓:π΅βŸΆπ‘ƒ)
3117fvexi 6898 . . . . . . . . . 10 𝑃 ∈ V
324fvexi 6898 . . . . . . . . . 10 𝐡 ∈ V
3331, 32elmap 8864 . . . . . . . . 9 (𝑓 ∈ (𝑃 ↑m 𝐡) ↔ 𝑓:π΅βŸΆπ‘ƒ)
3430, 33sylibr 233 . . . . . . . 8 (𝑓:𝐡–1-1-onto→𝑃 β†’ 𝑓 ∈ (𝑃 ↑m 𝐡))
3534adantr 480 . . . . . . 7 ((𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘)) β†’ 𝑓 ∈ (𝑃 ↑m 𝐡))
3635abssi 4062 . . . . . 6 {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))} βŠ† (𝑃 ↑m 𝐡)
3729, 36ssexi 5315 . . . . 5 {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))} ∈ V
3815, 27, 28, 37ovmpo 7563 . . . 4 ((𝐺 ∈ V ∧ 𝐻 ∈ V) β†’ (𝐺Ismt𝐻) = {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))})
391, 2, 38syl2an 595 . . 3 ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ π‘Š) β†’ (𝐺Ismt𝐻) = {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))})
4039eleq2d 2813 . 2 ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ π‘Š) β†’ (𝐹 ∈ (𝐺Ismt𝐻) ↔ 𝐹 ∈ {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))}))
41 f1of 6826 . . . . 5 (𝐹:𝐡–1-1-onto→𝑃 β†’ 𝐹:π΅βŸΆπ‘ƒ)
42 fex 7222 . . . . 5 ((𝐹:π΅βŸΆπ‘ƒ ∧ 𝐡 ∈ V) β†’ 𝐹 ∈ V)
4341, 32, 42sylancl 585 . . . 4 (𝐹:𝐡–1-1-onto→𝑃 β†’ 𝐹 ∈ V)
4443adantr 480 . . 3 ((𝐹:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘)) β†’ 𝐹 ∈ V)
45 f1oeq1 6814 . . . 4 (𝑓 = 𝐹 β†’ (𝑓:𝐡–1-1-onto→𝑃 ↔ 𝐹:𝐡–1-1-onto→𝑃))
46 fveq1 6883 . . . . . . 7 (𝑓 = 𝐹 β†’ (π‘“β€˜π‘Ž) = (πΉβ€˜π‘Ž))
47 fveq1 6883 . . . . . . 7 (𝑓 = 𝐹 β†’ (π‘“β€˜π‘) = (πΉβ€˜π‘))
4846, 47oveq12d 7422 . . . . . 6 (𝑓 = 𝐹 β†’ ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)))
4948eqeq1d 2728 . . . . 5 (𝑓 = 𝐹 β†’ (((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘) ↔ ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘)))
50492ralbidv 3212 . . . 4 (𝑓 = 𝐹 β†’ (βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘) ↔ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘)))
5145, 50anbi12d 630 . . 3 (𝑓 = 𝐹 β†’ ((𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘)) ↔ (𝐹:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘))))
5244, 51elab3 3671 . 2 (𝐹 ∈ {𝑓 ∣ (𝑓:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((π‘“β€˜π‘Ž) βˆ’ (π‘“β€˜π‘)) = (π‘Žπ·π‘))} ↔ (𝐹:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘)))
5340, 52bitrdi 287 1 ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ π‘Š) β†’ (𝐹 ∈ (𝐺Ismt𝐻) ↔ (𝐹:𝐡–1-1-onto→𝑃 ∧ βˆ€π‘Ž ∈ 𝐡 βˆ€π‘ ∈ 𝐡 ((πΉβ€˜π‘Ž) βˆ’ (πΉβ€˜π‘)) = (π‘Žπ·π‘))))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 395   = wceq 1533   ∈ wcel 2098  {cab 2703  βˆ€wral 3055  Vcvv 3468  βŸΆwf 6532  β€“1-1-ontoβ†’wf1o 6535  β€˜cfv 6536  (class class class)co 7404   ↑m cmap 8819  Basecbs 17151  distcds 17213  Ismtcismt 28287
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2697  ax-rep 5278  ax-sep 5292  ax-nul 5299  ax-pow 5356  ax-pr 5420  ax-un 7721
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2704  df-cleq 2718  df-clel 2804  df-nfc 2879  df-ne 2935  df-ral 3056  df-rex 3065  df-reu 3371  df-rab 3427  df-v 3470  df-sbc 3773  df-csb 3889  df-dif 3946  df-un 3948  df-in 3950  df-ss 3960  df-nul 4318  df-if 4524  df-pw 4599  df-sn 4624  df-pr 4626  df-op 4630  df-uni 4903  df-iun 4992  df-br 5142  df-opab 5204  df-mpt 5225  df-id 5567  df-xp 5675  df-rel 5676  df-cnv 5677  df-co 5678  df-dm 5679  df-rn 5680  df-res 5681  df-ima 5682  df-iota 6488  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-ov 7407  df-oprab 7408  df-mpo 7409  df-map 8821  df-ismt 28288
This theorem is referenced by:  ismot  28290
  Copyright terms: Public domain W3C validator