iscgrglt - Metamath Proof Explorer

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

Theorem iscgrglt 28522

Description: The property for two sequences 𝐴 and 𝐵 of points to be congruent, where the congruence is only required for indices verifying a less-than relation. (Contributed by Thierry Arnoux, 7-Oct-2020.)

**Hypotheses**
Ref	Expression
trgcgrg.p	⊢ 𝑃 = (Base‘𝐺)
trgcgrg.m	⊢ − = (dist‘𝐺)
trgcgrg.r	⊢ ∼ = (cgrG‘𝐺)
trgcgrg.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
iscgrglt.d	⊢ (𝜑 → 𝐷 ⊆ ℝ)
iscgrglt.a	⊢ (𝜑 → 𝐴:𝐷⟶𝑃)
iscgrglt.b	⊢ (𝜑 → 𝐵:𝐷⟶𝑃)

**Assertion**
Ref	Expression
iscgrglt	⊢ (𝜑 → (𝐴 ∼ 𝐵 ↔ ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴(𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))))

Distinct variable groups: − ,𝑖,𝑗 𝐴,𝑖,𝑗 𝐵,𝑖,𝑗 𝑖,𝐺,𝑗 𝜑,𝑖,𝑗 Allowed substitution hints: 𝐷(𝑖,𝑗) 𝑃(𝑖,𝑗) ∼ (𝑖,𝑗)

Proof of Theorem iscgrglt Dummy variables 𝑘 𝑙 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		trgcgrg.p	. . 3 ⊢ 𝑃 = (Base‘𝐺)
2		trgcgrg.m	. . 3 ⊢ − = (dist‘𝐺)
3		trgcgrg.r	. . 3 ⊢ ∼ = (cgrG‘𝐺)
4		trgcgrg.g	. . 3 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
5		iscgrglt.d	. . 3 ⊢ (𝜑 → 𝐷 ⊆ ℝ)
6		iscgrglt.a	. . 3 ⊢ (𝜑 → 𝐴:𝐷⟶𝑃)
7		iscgrglt.b	. . 3 ⊢ (𝜑 → 𝐵:𝐷⟶𝑃)
8	1, 2, 3, 4, 5, 6, 7	iscgrgd 28521	. 2 ⊢ (𝜑 → (𝐴 ∼ 𝐵 ↔ ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))))
9		simp2 1138	. . . . 5 ⊢ (((𝜑 ∧ (𝑖 ∈ dom 𝐴 ∧ 𝑗 ∈ dom 𝐴)) ∧ ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)) ∧ 𝑖 < 𝑗) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
10	9	3exp 1120	. . . 4 ⊢ ((𝜑 ∧ (𝑖 ∈ dom 𝐴 ∧ 𝑗 ∈ dom 𝐴)) → (((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)) → (𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))))
11	10	ralimdvva 3206	. . 3 ⊢ (𝜑 → (∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)) → ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴(𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))))
12		breq1 5146	. . . . . 6 ⊢ (𝑘 = 𝑖 → (𝑘 < 𝑙 ↔ 𝑖 < 𝑙))
13		fveq2 6906	. . . . . . . 8 ⊢ (𝑘 = 𝑖 → (𝐴‘𝑘) = (𝐴‘𝑖))
14	13	oveq1d 7446	. . . . . . 7 ⊢ (𝑘 = 𝑖 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐴‘𝑖) − (𝐴‘𝑙)))
15		fveq2 6906	. . . . . . . 8 ⊢ (𝑘 = 𝑖 → (𝐵‘𝑘) = (𝐵‘𝑖))
16	15	oveq1d 7446	. . . . . . 7 ⊢ (𝑘 = 𝑖 → ((𝐵‘𝑘) − (𝐵‘𝑙)) = ((𝐵‘𝑖) − (𝐵‘𝑙)))
17	14, 16	eqeq12d 2753	. . . . . 6 ⊢ (𝑘 = 𝑖 → (((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)) ↔ ((𝐴‘𝑖) − (𝐴‘𝑙)) = ((𝐵‘𝑖) − (𝐵‘𝑙))))
18	12, 17	imbi12d 344	. . . . 5 ⊢ (𝑘 = 𝑖 → ((𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙))) ↔ (𝑖 < 𝑙 → ((𝐴‘𝑖) − (𝐴‘𝑙)) = ((𝐵‘𝑖) − (𝐵‘𝑙)))))
19		breq2 5147	. . . . . 6 ⊢ (𝑙 = 𝑗 → (𝑖 < 𝑙 ↔ 𝑖 < 𝑗))
20		fveq2 6906	. . . . . . . 8 ⊢ (𝑙 = 𝑗 → (𝐴‘𝑙) = (𝐴‘𝑗))
21	20	oveq2d 7447	. . . . . . 7 ⊢ (𝑙 = 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑙)) = ((𝐴‘𝑖) − (𝐴‘𝑗)))
22		fveq2 6906	. . . . . . . 8 ⊢ (𝑙 = 𝑗 → (𝐵‘𝑙) = (𝐵‘𝑗))
23	22	oveq2d 7447	. . . . . . 7 ⊢ (𝑙 = 𝑗 → ((𝐵‘𝑖) − (𝐵‘𝑙)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
24	21, 23	eqeq12d 2753	. . . . . 6 ⊢ (𝑙 = 𝑗 → (((𝐴‘𝑖) − (𝐴‘𝑙)) = ((𝐵‘𝑖) − (𝐵‘𝑙)) ↔ ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))))
25	19, 24	imbi12d 344	. . . . 5 ⊢ (𝑙 = 𝑗 → ((𝑖 < 𝑙 → ((𝐴‘𝑖) − (𝐴‘𝑙)) = ((𝐵‘𝑖) − (𝐵‘𝑙))) ↔ (𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))))
26	18, 25	cbvral2vw 3241	. . . 4 ⊢ (∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙))) ↔ ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴(𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))))
27		simpllr 776	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 < 𝑗) → 𝑖 ∈ dom 𝐴)
28		simplr 769	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 < 𝑗) → 𝑗 ∈ dom 𝐴)
29		simp-4r 784	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 < 𝑗) → ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙))))
30	27, 28, 29	jca31 514	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 < 𝑗) → ((𝑖 ∈ dom 𝐴 ∧ 𝑗 ∈ dom 𝐴) ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))))
31		simpr 484	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 < 𝑗) → 𝑖 < 𝑗)
32	18, 25	rspc2va 3634	. . . . . . . . 9 ⊢ (((𝑖 ∈ dom 𝐴 ∧ 𝑗 ∈ dom 𝐴) ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) → (𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))))
33	30, 31, 32	sylc 65	. . . . . . . 8 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 < 𝑗) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
34		eqid 2737	. . . . . . . . . . 11 ⊢ (Itv‘𝐺) = (Itv‘𝐺)
35	4	ad3antrrr 730	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → 𝐺 ∈ TarskiG)
36	6	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝐴:𝐷⟶𝑃)
37		simplr 769	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑖 ∈ dom 𝐴)
38	36	fdmd 6746	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → dom 𝐴 = 𝐷)
39	37, 38	eleqtrd 2843	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑖 ∈ 𝐷)
40	36, 39	ffvelcdmd 7105	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → (𝐴‘𝑖) ∈ 𝑃)
41	40	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → (𝐴‘𝑖) ∈ 𝑃)
42	7	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝐵:𝐷⟶𝑃)
43	42, 39	ffvelcdmd 7105	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → (𝐵‘𝑖) ∈ 𝑃)
44	43	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → (𝐵‘𝑖) ∈ 𝑃)
45	1, 2, 34, 35, 41, 44	tgcgrtriv 28492	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → ((𝐴‘𝑖) − (𝐴‘𝑖)) = ((𝐵‘𝑖) − (𝐵‘𝑖)))
46		simpr 484	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → 𝑖 = 𝑗)
47	46	fveq2d 6910	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → (𝐴‘𝑖) = (𝐴‘𝑗))
48	47	oveq2d 7447	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → ((𝐴‘𝑖) − (𝐴‘𝑖)) = ((𝐴‘𝑖) − (𝐴‘𝑗)))
49	46	fveq2d 6910	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → (𝐵‘𝑖) = (𝐵‘𝑗))
50	49	oveq2d 7447	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → ((𝐵‘𝑖) − (𝐵‘𝑖)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
51	45, 48, 50	3eqtr3d 2785	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
52	51	adantl3r 750	. . . . . . . 8 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑖 = 𝑗) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
53	4	ad4antr 732	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → 𝐺 ∈ TarskiG)
54		simpr 484	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑗 ∈ dom 𝐴)
55	54, 38	eleqtrd 2843	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑗 ∈ 𝐷)
56	36, 55	ffvelcdmd 7105	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → (𝐴‘𝑗) ∈ 𝑃)
57	56	adantr 480	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐴‘𝑗) ∈ 𝑃)
58	57	adantl3r 750	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐴‘𝑗) ∈ 𝑃)
59	40	adantr 480	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐴‘𝑖) ∈ 𝑃)
60	59	adantl3r 750	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐴‘𝑖) ∈ 𝑃)
61	42, 55	ffvelcdmd 7105	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → (𝐵‘𝑗) ∈ 𝑃)
62	61	adantr 480	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐵‘𝑗) ∈ 𝑃)
63	62	adantl3r 750	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐵‘𝑗) ∈ 𝑃)
64	43	adantr 480	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐵‘𝑖) ∈ 𝑃)
65	64	adantl3r 750	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → (𝐵‘𝑖) ∈ 𝑃)
66		simplr 769	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → 𝑗 ∈ dom 𝐴)
67		simpllr 776	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → 𝑖 ∈ dom 𝐴)
68		simp-4r 784	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙))))
69	66, 67, 68	jca31 514	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → ((𝑗 ∈ dom 𝐴 ∧ 𝑖 ∈ dom 𝐴) ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))))
70		simpr 484	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → 𝑗 < 𝑖)
71		breq1 5146	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑗 → (𝑘 < 𝑙 ↔ 𝑗 < 𝑙))
72		fveq2 6906	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑗 → (𝐴‘𝑘) = (𝐴‘𝑗))
73	72	oveq1d 7446	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑗 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐴‘𝑗) − (𝐴‘𝑙)))
74		fveq2 6906	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑗 → (𝐵‘𝑘) = (𝐵‘𝑗))
75	74	oveq1d 7446	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑗 → ((𝐵‘𝑘) − (𝐵‘𝑙)) = ((𝐵‘𝑗) − (𝐵‘𝑙)))
76	73, 75	eqeq12d 2753	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑗 → (((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)) ↔ ((𝐴‘𝑗) − (𝐴‘𝑙)) = ((𝐵‘𝑗) − (𝐵‘𝑙))))
77	71, 76	imbi12d 344	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑗 → ((𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙))) ↔ (𝑗 < 𝑙 → ((𝐴‘𝑗) − (𝐴‘𝑙)) = ((𝐵‘𝑗) − (𝐵‘𝑙)))))
78		breq2 5147	. . . . . . . . . . . 12 ⊢ (𝑙 = 𝑖 → (𝑗 < 𝑙 ↔ 𝑗 < 𝑖))
79		fveq2 6906	. . . . . . . . . . . . . 14 ⊢ (𝑙 = 𝑖 → (𝐴‘𝑙) = (𝐴‘𝑖))
80	79	oveq2d 7447	. . . . . . . . . . . . 13 ⊢ (𝑙 = 𝑖 → ((𝐴‘𝑗) − (𝐴‘𝑙)) = ((𝐴‘𝑗) − (𝐴‘𝑖)))
81		fveq2 6906	. . . . . . . . . . . . . 14 ⊢ (𝑙 = 𝑖 → (𝐵‘𝑙) = (𝐵‘𝑖))
82	81	oveq2d 7447	. . . . . . . . . . . . 13 ⊢ (𝑙 = 𝑖 → ((𝐵‘𝑗) − (𝐵‘𝑙)) = ((𝐵‘𝑗) − (𝐵‘𝑖)))
83	80, 82	eqeq12d 2753	. . . . . . . . . . . 12 ⊢ (𝑙 = 𝑖 → (((𝐴‘𝑗) − (𝐴‘𝑙)) = ((𝐵‘𝑗) − (𝐵‘𝑙)) ↔ ((𝐴‘𝑗) − (𝐴‘𝑖)) = ((𝐵‘𝑗) − (𝐵‘𝑖))))
84	78, 83	imbi12d 344	. . . . . . . . . . 11 ⊢ (𝑙 = 𝑖 → ((𝑗 < 𝑙 → ((𝐴‘𝑗) − (𝐴‘𝑙)) = ((𝐵‘𝑗) − (𝐵‘𝑙))) ↔ (𝑗 < 𝑖 → ((𝐴‘𝑗) − (𝐴‘𝑖)) = ((𝐵‘𝑗) − (𝐵‘𝑖)))))
85	77, 84	rspc2va 3634	. . . . . . . . . 10 ⊢ (((𝑗 ∈ dom 𝐴 ∧ 𝑖 ∈ dom 𝐴) ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) → (𝑗 < 𝑖 → ((𝐴‘𝑗) − (𝐴‘𝑖)) = ((𝐵‘𝑗) − (𝐵‘𝑖))))
86	69, 70, 85	sylc 65	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → ((𝐴‘𝑗) − (𝐴‘𝑖)) = ((𝐵‘𝑗) − (𝐵‘𝑖)))
87	1, 2, 34, 53, 58, 60, 63, 65, 86	tgcgrcomlr 28488	. . . . . . . 8 ⊢ (((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) ∧ 𝑗 < 𝑖) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
88	6	fdmd 6746	. . . . . . . . . . . 12 ⊢ (𝜑 → dom 𝐴 = 𝐷)
89	88, 5	eqsstrd 4018	. . . . . . . . . . 11 ⊢ (𝜑 → dom 𝐴 ⊆ ℝ)
90	89	ad3antrrr 730	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → dom 𝐴 ⊆ ℝ)
91		simplr 769	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑖 ∈ dom 𝐴)
92	90, 91	sseldd 3984	. . . . . . . . 9 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑖 ∈ ℝ)
93		simpr 484	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑗 ∈ dom 𝐴)
94	90, 93	sseldd 3984	. . . . . . . . 9 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → 𝑗 ∈ ℝ)
95	92, 94	lttri4d 11402	. . . . . . . 8 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → (𝑖 < 𝑗 ∨ 𝑖 = 𝑗 ∨ 𝑗 < 𝑖))
96	33, 52, 87, 95	mpjao3dan 1434	. . . . . . 7 ⊢ ((((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ 𝑖 ∈ dom 𝐴) ∧ 𝑗 ∈ dom 𝐴) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
97	96	anasss 466	. . . . . 6 ⊢ (((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) ∧ (𝑖 ∈ dom 𝐴 ∧ 𝑗 ∈ dom 𝐴)) → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
98	97	ralrimivva 3202	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙)))) → ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))
99	98	ex 412	. . . 4 ⊢ (𝜑 → (∀𝑘 ∈ dom 𝐴∀𝑙 ∈ dom 𝐴(𝑘 < 𝑙 → ((𝐴‘𝑘) − (𝐴‘𝑙)) = ((𝐵‘𝑘) − (𝐵‘𝑙))) → ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))))
100	26, 99	biimtrrid 243	. . 3 ⊢ (𝜑 → (∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴(𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))) → ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗))))
101	11, 100	impbid 212	. 2 ⊢ (𝜑 → (∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)) ↔ ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴(𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))))
102	8, 101	bitrd 279	1 ⊢ (𝜑 → (𝐴 ∼ 𝐵 ↔ ∀𝑖 ∈ dom 𝐴∀𝑗 ∈ dom 𝐴(𝑖 < 𝑗 → ((𝐴‘𝑖) − (𝐴‘𝑗)) = ((𝐵‘𝑖) − (𝐵‘𝑗)))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1540 ∈ wcel 2108 ∀wral 3061 ⊆ wss 3951 class class class wbr 5143 dom cdm 5685 ⟶wf 6557 ‘cfv 6561 (class class class)co 7431 ℝcr 11154 < clt 11295 Basecbs 17247 distcds 17306 TarskiGcstrkg 28435 Itvcitv 28441 cgrGccgrg 28518

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-pow 5365 ax-pr 5432 ax-un 7755 ax-cnex 11211 ax-resscn 11212 ax-pre-lttri 11229 ax-pre-lttrn 11230

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 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-nel 3047 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-pw 4602 df-sn 4627 df-pr 4629 df-op 4633 df-uni 4908 df-br 5144 df-opab 5206 df-mpt 5226 df-id 5578 df-po 5592 df-so 5593 df-xp 5691 df-rel 5692 df-cnv 5693 df-co 5694 df-dm 5695 df-rn 5696 df-res 5697 df-ima 5698 df-iota 6514 df-fun 6563 df-fn 6564 df-f 6565 df-f1 6566 df-fo 6567 df-f1o 6568 df-fv 6569 df-ov 7434 df-oprab 7435 df-mpo 7436 df-er 8745 df-pm 8869 df-en 8986 df-dom 8987 df-sdom 8988 df-pnf 11297 df-mnf 11298 df-ltxr 11300 df-trkgc 28456 df-trkgcb 28458 df-trkg 28461 df-cgrg 28519

This theorem is referenced by: tgcgr4 28539

W3C validator