Theorem cofcut1 28333

Description: If 𝐶 is cofinal with 𝐴 and 𝐷 is coinitial with 𝐵 and the cut of 𝐴 and 𝐵 lies between 𝐶 and 𝐷, then the cut of 𝐶 and 𝐷 is equal to the cut of 𝐴 and 𝐵. Theorem 2.6 of [Gonshor] p. 10. (Contributed by Scott Fenton, 25-Sep-2024.)

Assertion

Ref	Expression
cofcut1	⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (𝐴 |s 𝐵) = (𝐶 |s 𝐷))

Distinct variable groups:   𝑥,𝐴   𝑧,𝐵   𝑥,𝐶,𝑦   𝑤,𝐷,𝑧

Allowed substitution hints:   𝐴(𝑦, 𝑧, 𝑤)   𝐵(𝑥, 𝑦, 𝑤)   𝐶(𝑧, 𝑤)   𝐷(𝑥, 𝑦)

Proof of Theorem cofcut1

Dummy variable 𝑡 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp3l 1220	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐶 <<s {(𝐴 |s 𝐵)})
2		simp3r 1221	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → {(𝐴 |s 𝐵)} <<s 𝐷)
3		simp1 1154	. . . . . 6 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐴 <<s 𝐵)
4		cutbday 28197	. . . . . 6 ⊢ (𝐴 <<s 𝐵 → (bday‘(𝐴 |s 𝐵)) = ∩ (bday “ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)}))
5	3, 4	syl 18	. . . . 5 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (bday‘(𝐴 |s 𝐵)) = ∩ (bday “ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)}))
6		sltsex1 28176	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → 𝐴 ∈ V)
7	3, 6	syl 18	. . . . . . . . . . . 12 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐴 ∈ V)
8	7	ad2antrr 739	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ 𝐶 <<s {𝑡}) → 𝐴 ∈ V)
9		sltsss1 28178	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → 𝐴 ⊆ No)
10	3, 9	syl 18	. . . . . . . . . . . 12 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐴 ⊆ No)
11	10	ad2antrr 739	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ 𝐶 <<s {𝑡}) → 𝐴 ⊆ No)
12	8, 11	elpwd 4566	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ 𝐶 <<s {𝑡}) → 𝐴 ∈ 𝒫 No)
13		simpl2l 1245	. . . . . . . . . . 11 ⊢ (((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) → ∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦)
14	13	adantr 486	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ 𝐶 <<s {𝑡}) → ∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦)
15		simpr 490	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ 𝐶 <<s {𝑡}) → 𝐶 <<s {𝑡})
16		cofslts 28331	. . . . . . . . . 10 ⊢ ((𝐴 ∈ 𝒫 No ∧ ∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ 𝐶 <<s {𝑡}) → 𝐴 <<s {𝑡})
17	12, 14, 15, 16	syl3anc 1399	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ 𝐶 <<s {𝑡}) → 𝐴 <<s {𝑡})
18	17	ex 418	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) → (𝐶 <<s {𝑡} → 𝐴 <<s {𝑡}))
19		sltsex2 28177	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → 𝐵 ∈ V)
20	3, 19	syl 18	. . . . . . . . . . . 12 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐵 ∈ V)
21	20	ad2antrr 739	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ {𝑡} <<s 𝐷) → 𝐵 ∈ V)
22		sltsss2 28179	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → 𝐵 ⊆ No)
23	3, 22	syl 18	. . . . . . . . . . . 12 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐵 ⊆ No)
24	23	ad2antrr 739	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ {𝑡} <<s 𝐷) → 𝐵 ⊆ No)
25	21, 24	elpwd 4566	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ {𝑡} <<s 𝐷) → 𝐵 ∈ 𝒫 No)
26		simpl2r 1246	. . . . . . . . . . 11 ⊢ (((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) → ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧)
27	26	adantr 486	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ {𝑡} <<s 𝐷) → ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧)
28		simpr 490	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ {𝑡} <<s 𝐷) → {𝑡} <<s 𝐷)
29		coinitslts 28332	. . . . . . . . . 10 ⊢ ((𝐵 ∈ 𝒫 No ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧 ∧ {𝑡} <<s 𝐷) → {𝑡} <<s 𝐵)
30	25, 27, 28, 29	syl3anc 1399	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) ∧ {𝑡} <<s 𝐷) → {𝑡} <<s 𝐵)
31	30	ex 418	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) → ({𝑡} <<s 𝐷 → {𝑡} <<s 𝐵))
32	18, 31	anim12d 621	. . . . . . 7 ⊢ (((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) ∧ 𝑡 ∈ No) → ((𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷) → (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)))
33	32	ss2rabdv 4003	. . . . . 6 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)} ⊆ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)})
34		imass2 6066	. . . . . 6 ⊢ ({𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)} ⊆ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)} → (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}) ⊆ (bday “ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)}))
35		intss 4932	. . . . . 6 ⊢ ((bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}) ⊆ (bday “ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)}) → ∩ (bday “ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)}) ⊆ ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))
36	33, 34, 35	3syl 19	. . . . 5 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → ∩ (bday “ {𝑡 ∈ No ∣ (𝐴 <<s {𝑡} ∧ {𝑡} <<s 𝐵)}) ⊆ ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))
37	5, 36	eqsstrd 3947	. . . 4 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (bday‘(𝐴 |s 𝐵)) ⊆ ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))
38		bdayfn 28161	. . . . . 6 ⊢ bday Fn No
39		ssrab2 4008	. . . . . 6 ⊢ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)} ⊆ No
40		sneq 4594	. . . . . . . . 9 ⊢ (𝑡 = (𝐴 |s 𝐵) → {𝑡} = {(𝐴 |s 𝐵)})
41	40	breq2d 5118	. . . . . . . 8 ⊢ (𝑡 = (𝐴 |s 𝐵) → (𝐶 <<s {𝑡} ↔ 𝐶 <<s {(𝐴 |s 𝐵)}))
42	40	breq1d 5116	. . . . . . . 8 ⊢ (𝑡 = (𝐴 |s 𝐵) → ({𝑡} <<s 𝐷 ↔ {(𝐴 |s 𝐵)} <<s 𝐷))
43	41, 42	anbi12d 644	. . . . . . 7 ⊢ (𝑡 = (𝐴 |s 𝐵) → ((𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷) ↔ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)))
44	3	cutscld 28196	. . . . . . 7 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (𝐴 |s 𝐵) ∈ No)
45		simp3 1156	. . . . . . 7 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷))
46	43, 44, 45	elrabd 3650	. . . . . 6 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (𝐴 |s 𝐵) ∈ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)})
47		fnfvima 7259	. . . . . 6 ⊢ ((bday Fn No ∧ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)} ⊆ No ∧ (𝐴 |s 𝐵) ∈ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}) → (bday‘(𝐴 |s 𝐵)) ∈ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))
48	38, 39, 46, 47	mp3an12i 1495	. . . . 5 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (bday‘(𝐴 |s 𝐵)) ∈ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))
49		intss1 4926	. . . . 5 ⊢ ((bday‘(𝐴 |s 𝐵)) ∈ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}) → ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}) ⊆ (bday‘(𝐴 |s 𝐵)))
50	48, 49	syl 18	. . . 4 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}) ⊆ (bday‘(𝐴 |s 𝐵)))
51	37, 50	eqssd 3930	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (bday‘(𝐴 |s 𝐵)) = ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))
52		ovex 7473	. . . . . . 7 ⊢ (𝐴 |s 𝐵) ∈ V
53	52	snnz 4737	. . . . . 6 ⊢ {(𝐴 |s 𝐵)} ≠ ∅
54		sltstr 28200	. . . . . 6 ⊢ ((𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷 ∧ {(𝐴 |s 𝐵)} ≠ ∅) → 𝐶 <<s 𝐷)
55	53, 54	mp3an3 1480	. . . . 5 ⊢ ((𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) → 𝐶 <<s 𝐷)
56	55	3ad2ant3 1153	. . . 4 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → 𝐶 <<s 𝐷)
57		eqcuts 28198	. . . 4 ⊢ ((𝐶 <<s 𝐷 ∧ (𝐴 |s 𝐵) ∈ No) → ((𝐶 |s 𝐷) = (𝐴 |s 𝐵) ↔ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷 ∧ (bday‘(𝐴 |s 𝐵)) = ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))))
58	56, 44, 57	syl2anc 596	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → ((𝐶 |s 𝐷) = (𝐴 |s 𝐵) ↔ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷 ∧ (bday‘(𝐴 |s 𝐵)) = ∩ (bday “ {𝑡 ∈ No ∣ (𝐶 <<s {𝑡} ∧ {𝑡} <<s 𝐷)}))))
59	1, 2, 51, 58	mpbir3and 1361	. 2 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (𝐶 |s 𝐷) = (𝐴 |s 𝐵))
60	59	eqcomd 2769	1 ⊢ ((𝐴 <<s 𝐵 ∧ (∀𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐶 𝑥 ≤s 𝑦 ∧ ∀𝑧 ∈ 𝐵 ∃𝑤 ∈ 𝐷 𝑤 ≤s 𝑧) ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷)) → (𝐴 |s 𝐵) = (𝐶 |s 𝐷))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ≠ wne 2959  ∀wral 3080  ∃wrex 3090  {crab 3416  Vcvv 3454   ⊆ wss 3900  ∅c0 4281  𝒫 cpw 4560  {csn 4588  ∩ cint 4910   class class class wbr 5106   “ cima 5658   Fn wfn 6550  ‘cfv 6555  (class class class)co 7440  Nocsur 28024  bdaycbday 28026   ≤s cles 28128   <<s cslts 28170   |s ccuts 28172

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 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7772

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  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-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  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-tp 4593  df-op 4839  df-uni 4871  df-int 4911  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-ord 6380  df-on 6381  df-suc 6383  df-iota 6509  df-fun 6557  df-fn 6558  df-f 6559  df-f1 6560  df-fo 6561  df-f1o 6562  df-fv 6563  df-riota 7397  df-ov 7443  df-oprab 7444  df-mpo 7445  df-1o 8501  df-2o 8502  df-no 28027  df-lts 28028  df-bday 28029  df-les 28129  df-slts 28171  df-cuts 28173

This theorem is used by:  cofcut1d  28334  cofcut2  28335