Theorem isismt 29054

Description: Property of being an isometry. Compare with isismty 39001. (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-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏))))

Distinct variable groups:   𝐵,𝑎,𝑏   𝐹,𝑎,𝑏   𝐺,𝑎,𝑏   𝐻,𝑎,𝑏

Allowed substitution hints:   𝐷(𝑎, 𝑏)   𝑃(𝑎, 𝑏)   − (𝑎, 𝑏)   𝑉(𝑎, 𝑏)   𝑊(𝑎, 𝑏)

Proof of Theorem isismt

Dummy variables 𝑓 𝑔 ℎ are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elex 3475	. . . 4 ⊢ (𝐺 ∈ 𝑉 → 𝐺 ∈ V)
2		elex 3475	. . . 4 ⊢ (𝐻 ∈ 𝑊 → 𝐻 ∈ V)
3		fveq2 6916	. . . . . . . . 9 ⊢ (𝑔 = 𝐺 → (Base‘𝑔) = (Base‘𝐺))
4		isismt.b	. . . . . . . . 9 ⊢ 𝐵 = (Base‘𝐺)
5	3, 4	eqtr4di 2816	. . . . . . . 8 ⊢ (𝑔 = 𝐺 → (Base‘𝑔) = 𝐵)
6	5	f1oeq2d 6850	. . . . . . 7 ⊢ (𝑔 = 𝐺 → (𝑓:(Base‘𝑔)⟶1-1onto(Base‘ℎ) ↔ 𝑓:𝐵⟶1-1onto(Base‘ℎ)))
7		fveq2 6916	. . . . . . . . . . . 12 ⊢ (𝑔 = 𝐺 → (dist‘𝑔) = (dist‘𝐺))
8		isismt.d	. . . . . . . . . . . 12 ⊢ 𝐷 = (dist‘𝐺)
9	7, 8	eqtr4di 2816	. . . . . . . . . . 11 ⊢ (𝑔 = 𝐺 → (dist‘𝑔) = 𝐷)
10	9	oveqd 7468	. . . . . . . . . 10 ⊢ (𝑔 = 𝐺 → (𝑎(dist‘𝑔)𝑏) = (𝑎𝐷𝑏))
11	10	eqeq2d 2774	. . . . . . . . 9 ⊢ (𝑔 = 𝐺 → (((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎(dist‘𝑔)𝑏) ↔ ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏)))
12	5, 11	raleqbidv 3338	. . . . . . . 8 ⊢ (𝑔 = 𝐺 → (∀𝑏 ∈ (Base‘𝑔)((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎(dist‘𝑔)𝑏) ↔ ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏)))
13	5, 12	raleqbidv 3338	. . . . . . 7 ⊢ (𝑔 = 𝐺 → (∀𝑎 ∈ (Base‘𝑔)∀𝑏 ∈ (Base‘𝑔)((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎(dist‘𝑔)𝑏) ↔ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏)))
14	6, 13	anbi12d 644	. . . . . 6 ⊢ (𝑔 = 𝐺 → ((𝑓:(Base‘𝑔)⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ (Base‘𝑔)∀𝑏 ∈ (Base‘𝑔)((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎(dist‘𝑔)𝑏)) ↔ (𝑓:𝐵⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏))))
15	14	abbidv 2829	. . . . 5 ⊢ (𝑔 = 𝐺 → {𝑓 ∣ (𝑓:(Base‘𝑔)⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ (Base‘𝑔)∀𝑏 ∈ (Base‘𝑔)((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎(dist‘𝑔)𝑏))} = {𝑓 ∣ (𝑓:𝐵⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏))})
16		fveq2 6916	. . . . . . . . 9 ⊢ (ℎ = 𝐻 → (Base‘ℎ) = (Base‘𝐻))
17		isismt.p	. . . . . . . . 9 ⊢ 𝑃 = (Base‘𝐻)
18	16, 17	eqtr4di 2816	. . . . . . . 8 ⊢ (ℎ = 𝐻 → (Base‘ℎ) = 𝑃)
19	18	f1oeq3d 6851	. . . . . . 7 ⊢ (ℎ = 𝐻 → (𝑓:𝐵⟶1-1onto(Base‘ℎ) ↔ 𝑓:𝐵⟶1-1onto𝑃))
20		fveq2 6916	. . . . . . . . . . 11 ⊢ (ℎ = 𝐻 → (dist‘ℎ) = (dist‘𝐻))
21		isismt.m	. . . . . . . . . . 11 ⊢ − = (dist‘𝐻)
22	20, 21	eqtr4di 2816	. . . . . . . . . 10 ⊢ (ℎ = 𝐻 → (dist‘ℎ) = − )
23	22	oveqd 7468	. . . . . . . . 9 ⊢ (ℎ = 𝐻 → ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = ((𝑓‘𝑎) − (𝑓‘𝑏)))
24	23	eqeq1d 2765	. . . . . . . 8 ⊢ (ℎ = 𝐻 → (((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏) ↔ ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏)))
25	24	2ralbidv 3230	. . . . . . 7 ⊢ (ℎ = 𝐻 → (∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏) ↔ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏)))
26	19, 25	anbi12d 644	. . . . . 6 ⊢ (ℎ = 𝐻 → ((𝑓:𝐵⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏)) ↔ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))))
27	26	abbidv 2829	. . . . 5 ⊢ (ℎ = 𝐻 → {𝑓 ∣ (𝑓:𝐵⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎𝐷𝑏))} = {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))})
28		df-ismt 29053	. . . . 5 ⊢ Ismt = (𝑔 ∈ V, ℎ ∈ V ↦ {𝑓 ∣ (𝑓:(Base‘𝑔)⟶1-1onto(Base‘ℎ) ∧ ∀𝑎 ∈ (Base‘𝑔)∀𝑏 ∈ (Base‘𝑔)((𝑓‘𝑎)(dist‘ℎ)(𝑓‘𝑏)) = (𝑎(dist‘𝑔)𝑏))})
29		ovex 7484	. . . . . 6 ⊢ (𝑃 ↑m 𝐵) ∈ V
30		f1of 6854	. . . . . . . . 9 ⊢ (𝑓:𝐵⟶1-1onto𝑃 → 𝑓:𝐵⟶𝑃)
31	17	fvexi 6930	. . . . . . . . . 10 ⊢ 𝑃 ∈ V
32	4	fvexi 6930	. . . . . . . . . 10 ⊢ 𝐵 ∈ V
33	31, 32	elmap 8937	. . . . . . . . 9 ⊢ (𝑓 ∈ (𝑃 ↑m 𝐵) ↔ 𝑓:𝐵⟶𝑃)
34	30, 33	sylibr 237	. . . . . . . 8 ⊢ (𝑓:𝐵⟶1-1onto𝑃 → 𝑓 ∈ (𝑃 ↑m 𝐵))
35	34	adantr 486	. . . . . . 7 ⊢ ((𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏)) → 𝑓 ∈ (𝑃 ↑m 𝐵))
36	35	abssi 3996	. . . . . 6 ⊢ {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))} ⊆ (𝑃 ↑m 𝐵)
37	29, 36	ssexi 5291	. . . . 5 ⊢ {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))} ∈ V
38	15, 27, 28, 37	ovmpo 7612	. . . 4 ⊢ ((𝐺 ∈ V ∧ 𝐻 ∈ V) → (𝐺Ismt𝐻) = {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))})
39	1, 2, 38	syl2an 608	. . 3 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ 𝑊) → (𝐺Ismt𝐻) = {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))})
40	39	eleq2d 2850	. 2 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ 𝑊) → (𝐹 ∈ (𝐺Ismt𝐻) ↔ 𝐹 ∈ {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))}))
41		f1of 6854	. . . . 5 ⊢ (𝐹:𝐵⟶1-1onto𝑃 → 𝐹:𝐵⟶𝑃)
42		fex 7263	. . . . 5 ⊢ ((𝐹:𝐵⟶𝑃 ∧ 𝐵 ∈ V) → 𝐹 ∈ V)
43	41, 32, 42	sylancl 598	. . . 4 ⊢ (𝐹:𝐵⟶1-1onto𝑃 → 𝐹 ∈ V)
44	43	adantr 486	. . 3 ⊢ ((𝐹:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏)) → 𝐹 ∈ V)
45		f1oeq1 6842	. . . 4 ⊢ (𝑓 = 𝐹 → (𝑓:𝐵⟶1-1onto𝑃 ↔ 𝐹:𝐵⟶1-1onto𝑃))
46		fveq1 6915	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (𝑓‘𝑎) = (𝐹‘𝑎))
47		fveq1 6915	. . . . . . 7 ⊢ (𝑓 = 𝐹 → (𝑓‘𝑏) = (𝐹‘𝑏))
48	46, 47	oveq12d 7469	. . . . . 6 ⊢ (𝑓 = 𝐹 → ((𝑓‘𝑎) − (𝑓‘𝑏)) = ((𝐹‘𝑎) − (𝐹‘𝑏)))
49	48	eqeq1d 2765	. . . . 5 ⊢ (𝑓 = 𝐹 → (((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏) ↔ ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏)))
50	49	2ralbidv 3230	. . . 4 ⊢ (𝑓 = 𝐹 → (∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏) ↔ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏)))
51	45, 50	anbi12d 644	. . 3 ⊢ (𝑓 = 𝐹 → ((𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏)) ↔ (𝐹:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏))))
52	44, 51	elab3 3643	. 2 ⊢ (𝐹 ∈ {𝑓 ∣ (𝑓:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝑓‘𝑎) − (𝑓‘𝑏)) = (𝑎𝐷𝑏))} ↔ (𝐹:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏)))
53	40, 52	bitrdi 290	1 ⊢ ((𝐺 ∈ 𝑉 ∧ 𝐻 ∈ 𝑊) → (𝐹 ∈ (𝐺Ismt𝐻) ↔ (𝐹:𝐵⟶1-1onto𝑃 ∧ ∀𝑎 ∈ 𝐵 ∀𝑏 ∈ 𝐵 ((𝐹‘𝑎) − (𝐹‘𝑏)) = (𝑎𝐷𝑏))))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2147  {cab 2741  ∀wral 3080  Vcvv 3454  ⟶wf 6562  ⟶1-1ontowf1o 6565  ‘cfv 6566  (class class class)co 7451   ↑_m cmap 8885  Basecbs 17431  distcds 17481  Ismtcismt 29052

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-id 5553  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-ov 7454  df-oprab 7455  df-mpo 7456  df-map 8887  df-ismt 29053

This theorem is used by:  ismot  29055