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

Theorem txlm 23814
Description: Two sequences converge iff the sequence of their ordered pairs converges. Proposition 14-2.6 of [Gleason] p. 230. (Contributed by NM, 16-Jul-2007.) (Revised by Mario Carneiro, 5-May-2014.)
Hypotheses
Ref Expression
txlm.z 𝑍 = (ℤ𝑀)
txlm.m (𝜑𝑀 ∈ ℤ)
txlm.j (𝜑𝐽 ∈ (TopOn‘𝑋))
txlm.k (𝜑𝐾 ∈ (TopOn‘𝑌))
txlm.f (𝜑𝐹:𝑍𝑋)
txlm.g (𝜑𝐺:𝑍𝑌)
txlm.h 𝐻 = (𝑛𝑍 ↦ ⟨(𝐹𝑛), (𝐺𝑛)⟩)
Assertion
Ref Expression
txlm (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ 𝐻(⇝𝑡‘(𝐽 ×t 𝐾))⟨𝑅, 𝑆⟩))
Distinct variable groups:   𝑛,𝐹   𝜑,𝑛   𝑛,𝐺   𝑛,𝐽   𝑛,𝐾   𝑛,𝑋   𝑛,𝑌   𝑛,𝑍
Allowed substitution hints:   𝑅(𝑛)   𝑆(𝑛)   𝐻(𝑛)   𝑀(𝑛)

Proof of Theorem txlm
Dummy variables 𝑗 𝑘 𝑢 𝑣 𝑤 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 r19.27v 3194 . . . . . . . 8 ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑢𝐽 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
2 r19.28v 3196 . . . . . . . . 9 (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
32ralimi 3102 . . . . . . . 8 (∀𝑢𝐽 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
41, 3syl 18 . . . . . . 7 ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
5 simprl 782 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → 𝑤 ∈ (𝐽 ×t 𝐾))
6 txlm.j . . . . . . . . . . . . . . . . . 18 (𝜑𝐽 ∈ (TopOn‘𝑋))
7 topontop 23079 . . . . . . . . . . . . . . . . . 18 (𝐽 ∈ (TopOn‘𝑋) → 𝐽 ∈ Top)
86, 7syl 18 . . . . . . . . . . . . . . . . 17 (𝜑𝐽 ∈ Top)
9 txlm.k . . . . . . . . . . . . . . . . . 18 (𝜑𝐾 ∈ (TopOn‘𝑌))
10 topontop 23079 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (TopOn‘𝑌) → 𝐾 ∈ Top)
119, 10syl 18 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ Top)
12 eqid 2763 . . . . . . . . . . . . . . . . . 18 ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣)) = ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))
1312txval 23730 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ Top ∧ 𝐾 ∈ Top) → (𝐽 ×t 𝐾) = (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
148, 11, 13syl2anc 595 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐽 ×t 𝐾) = (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
1514adantr 485 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → (𝐽 ×t 𝐾) = (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
165, 15eleqtrd 2865 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → 𝑤 ∈ (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
17 simprr 784 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → ⟨𝑅, 𝑆⟩ ∈ 𝑤)
18 tg2 23131 . . . . . . . . . . . . . 14 ((𝑤 ∈ (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤) → ∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤))
1916, 17, 18syl2anc 595 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → ∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤))
20 vex 3459 . . . . . . . . . . . . . . . 16 𝑢 ∈ V
21 vex 3459 . . . . . . . . . . . . . . . 16 𝑣 ∈ V
2220, 21xpex 7748 . . . . . . . . . . . . . . 15 (𝑢 × 𝑣) ∈ V
2322rgen2w 3084 . . . . . . . . . . . . . 14 𝑢𝐽𝑣𝐾 (𝑢 × 𝑣) ∈ V
24 eqid 2763 . . . . . . . . . . . . . . 15 (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣)) = (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))
25 eleq2 2852 . . . . . . . . . . . . . . . 16 (𝑡 = (𝑢 × 𝑣) → (⟨𝑅, 𝑆⟩ ∈ 𝑡 ↔ ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣)))
26 sseq1 3962 . . . . . . . . . . . . . . . 16 (𝑡 = (𝑢 × 𝑣) → (𝑡𝑤 ↔ (𝑢 × 𝑣) ⊆ 𝑤))
2725, 26anbi12d 643 . . . . . . . . . . . . . . 15 (𝑡 = (𝑢 × 𝑣) → ((⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
2824, 27rexrnmpo 7550 . . . . . . . . . . . . . 14 (∀𝑢𝐽𝑣𝐾 (𝑢 × 𝑣) ∈ V → (∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤) ↔ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
2923, 28ax-mp 5 . . . . . . . . . . . . 13 (∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤) ↔ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤))
3019, 29sylib 221 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤))
3130ex 417 . . . . . . . . . . 11 (𝜑 → ((𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤) → ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
32 r19.29 3128 . . . . . . . . . . . . 13 ((∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑢𝐽 (∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
33 r19.29 3128 . . . . . . . . . . . . . . 15 ((∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑣𝐾 (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
34 simprl 782 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣))
35 opelxp 5697 . . . . . . . . . . . . . . . . . . . . 21 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ↔ (𝑅𝑢𝑆𝑣))
3634, 35sylib 221 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (𝑅𝑢𝑆𝑣))
37 pm2.27 43 . . . . . . . . . . . . . . . . . . . . 21 (𝑅𝑢 → ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))
38 pm2.27 43 . . . . . . . . . . . . . . . . . . . . 21 (𝑆𝑣 → ((𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
3937, 38im2anan9 631 . . . . . . . . . . . . . . . . . . . 20 ((𝑅𝑢𝑆𝑣) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
4036, 39syl 18 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
41 txlm.z . . . . . . . . . . . . . . . . . . . . 21 𝑍 = (ℤ𝑀)
4241rexanuz2 15406 . . . . . . . . . . . . . . . . . . . 20 (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) ↔ (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
4341uztrn2 12885 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑗𝑍𝑘 ∈ (ℤ𝑗)) → 𝑘𝑍)
44 opelxpi 5698 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑣))
45 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
46 fveq2 6881 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = 𝑘 → (𝐺𝑛) = (𝐺𝑘))
4745, 46opeq12d 4846 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 𝑘 → ⟨(𝐹𝑛), (𝐺𝑛)⟩ = ⟨(𝐹𝑘), (𝐺𝑘)⟩)
48 txlm.h . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 𝐻 = (𝑛𝑍 ↦ ⟨(𝐹𝑛), (𝐺𝑛)⟩)
49 opex 5445 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ V
5047, 48, 49fvmpt 6989 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘𝑍 → (𝐻𝑘) = ⟨(𝐹𝑘), (𝐺𝑘)⟩)
5150eleq1d 2848 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑢 × 𝑣) ↔ ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑣)))
5244, 51imbitrrid 249 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘𝑍 → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ (𝑢 × 𝑣)))
5352adantl 486 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ (𝑢 × 𝑣)))
54 simplrr 789 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → (𝑢 × 𝑣) ⊆ 𝑤)
5554sseld 3936 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → ((𝐻𝑘) ∈ (𝑢 × 𝑣) → (𝐻𝑘) ∈ 𝑤))
5653, 55syld 48 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ 𝑤))
5743, 56sylan2 604 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ (𝑗𝑍𝑘 ∈ (ℤ𝑗))) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ 𝑤))
5857anassrs 472 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑗𝑍) ∧ 𝑘 ∈ (ℤ𝑗)) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ 𝑤))
5958ralimdva 3177 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑗𝑍) → (∀𝑘 ∈ (ℤ𝑗)((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → ∀𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6059reximdva 3178 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6142, 60biimtrrid 246 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ((∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6240, 61syld 48 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6362ex 417 . . . . . . . . . . . . . . . . 17 (((𝜑𝑢𝐽) ∧ 𝑣𝐾) → ((⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
6463impcomd 416 . . . . . . . . . . . . . . . 16 (((𝜑𝑢𝐽) ∧ 𝑣𝐾) → ((((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6564rexlimdva 3166 . . . . . . . . . . . . . . 15 ((𝜑𝑢𝐽) → (∃𝑣𝐾 (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6633, 65syl5 35 . . . . . . . . . . . . . 14 ((𝜑𝑢𝐽) → ((∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6766rexlimdva 3166 . . . . . . . . . . . . 13 (𝜑 → (∃𝑢𝐽 (∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6832, 67syl5 35 . . . . . . . . . . . 12 (𝜑 → ((∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6968expcomd 421 . . . . . . . . . . 11 (𝜑 → (∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤) → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7031, 69syld 48 . . . . . . . . . 10 (𝜑 → ((𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤) → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7170expdimp 457 . . . . . . . . 9 ((𝜑𝑤 ∈ (𝐽 ×t 𝐾)) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7271com23 87 . . . . . . . 8 ((𝜑𝑤 ∈ (𝐽 ×t 𝐾)) → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7372ralrimdva 3165 . . . . . . 7 (𝜑 → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
744, 73syl5 35 . . . . . 6 (𝜑 → ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7574adantr 485 . . . . 5 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
768adantr 485 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝐽 ∈ Top)
7711adantr 485 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝐾 ∈ Top)
78 simprr 784 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝑢𝐽)
79 toponmax 23092 . . . . . . . . . . . . . 14 (𝐾 ∈ (TopOn‘𝑌) → 𝑌𝐾)
809, 79syl 18 . . . . . . . . . . . . 13 (𝜑𝑌𝐾)
8180adantr 485 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝑌𝐾)
82 txopn 23768 . . . . . . . . . . . 12 (((𝐽 ∈ Top ∧ 𝐾 ∈ Top) ∧ (𝑢𝐽𝑌𝐾)) → (𝑢 × 𝑌) ∈ (𝐽 ×t 𝐾))
8376, 77, 78, 81, 82syl22anc 851 . . . . . . . . . . 11 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (𝑢 × 𝑌) ∈ (𝐽 ×t 𝐾))
84 eleq2 2852 . . . . . . . . . . . . 13 (𝑤 = (𝑢 × 𝑌) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 ↔ ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌)))
85 eleq2 2852 . . . . . . . . . . . . . 14 (𝑤 = (𝑢 × 𝑌) → ((𝐻𝑘) ∈ 𝑤 ↔ (𝐻𝑘) ∈ (𝑢 × 𝑌)))
8685rexralbidv 3231 . . . . . . . . . . . . 13 (𝑤 = (𝑢 × 𝑌) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤 ↔ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌)))
8784, 86imbi12d 347 . . . . . . . . . . . 12 (𝑤 = (𝑢 × 𝑌) → ((⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌))))
8887rspcv 3577 . . . . . . . . . . 11 ((𝑢 × 𝑌) ∈ (𝐽 ×t 𝐾) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌))))
8983, 88syl 18 . . . . . . . . . 10 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌))))
90 simprl 782 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝑆𝑌)
91 opelxpi 5698 . . . . . . . . . . . . 13 ((𝑅𝑢𝑆𝑌) → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌))
9290, 91sylan2 604 . . . . . . . . . . . 12 ((𝑅𝑢 ∧ (𝜑 ∧ (𝑆𝑌𝑢𝐽))) → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌))
9392expcom 418 . . . . . . . . . . 11 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (𝑅𝑢 → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌)))
9450eleq1d 2848 . . . . . . . . . . . . . . . 16 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑢 × 𝑌) ↔ ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑌)))
95 opelxp1 5703 . . . . . . . . . . . . . . . 16 (⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑌) → (𝐹𝑘) ∈ 𝑢)
9694, 95biimtrdi 256 . . . . . . . . . . . . . . 15 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑢 × 𝑌) → (𝐹𝑘) ∈ 𝑢))
9743, 96syl 18 . . . . . . . . . . . . . 14 ((𝑗𝑍𝑘 ∈ (ℤ𝑗)) → ((𝐻𝑘) ∈ (𝑢 × 𝑌) → (𝐹𝑘) ∈ 𝑢))
9897ralimdva 3177 . . . . . . . . . . . . 13 (𝑗𝑍 → (∀𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌) → ∀𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))
9998reximia 3100 . . . . . . . . . . . 12 (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)
10099a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))
10193, 100imim12d 82 . . . . . . . . . 10 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → ((⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌)) → (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
10289, 101syld 48 . . . . . . . . 9 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
103102anassrs 472 . . . . . . . 8 (((𝜑𝑆𝑌) ∧ 𝑢𝐽) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
104103ralrimdva 3165 . . . . . . 7 ((𝜑𝑆𝑌) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
105104adantrl 728 . . . . . 6 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
1068adantr 485 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝐽 ∈ Top)
10711adantr 485 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝐾 ∈ Top)
108 toponmax 23092 . . . . . . . . . . . . . 14 (𝐽 ∈ (TopOn‘𝑋) → 𝑋𝐽)
1096, 108syl 18 . . . . . . . . . . . . 13 (𝜑𝑋𝐽)
110109adantr 485 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝑋𝐽)
111 simprr 784 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝑣𝐾)
112 txopn 23768 . . . . . . . . . . . 12 (((𝐽 ∈ Top ∧ 𝐾 ∈ Top) ∧ (𝑋𝐽𝑣𝐾)) → (𝑋 × 𝑣) ∈ (𝐽 ×t 𝐾))
113106, 107, 110, 111, 112syl22anc 851 . . . . . . . . . . 11 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (𝑋 × 𝑣) ∈ (𝐽 ×t 𝐾))
114 eleq2 2852 . . . . . . . . . . . . 13 (𝑤 = (𝑋 × 𝑣) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 ↔ ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣)))
115 eleq2 2852 . . . . . . . . . . . . . 14 (𝑤 = (𝑋 × 𝑣) → ((𝐻𝑘) ∈ 𝑤 ↔ (𝐻𝑘) ∈ (𝑋 × 𝑣)))
116115rexralbidv 3231 . . . . . . . . . . . . 13 (𝑤 = (𝑋 × 𝑣) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤 ↔ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣)))
117114, 116imbi12d 347 . . . . . . . . . . . 12 (𝑤 = (𝑋 × 𝑣) → ((⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣))))
118117rspcv 3577 . . . . . . . . . . 11 ((𝑋 × 𝑣) ∈ (𝐽 ×t 𝐾) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣))))
119113, 118syl 18 . . . . . . . . . 10 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣))))
120 opelxpi 5698 . . . . . . . . . . . . 13 ((𝑅𝑋𝑆𝑣) → ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣))
121120ex 417 . . . . . . . . . . . 12 (𝑅𝑋 → (𝑆𝑣 → ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣)))
122121ad2antrl 740 . . . . . . . . . . 11 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (𝑆𝑣 → ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣)))
12350eleq1d 2848 . . . . . . . . . . . . . . . 16 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑋 × 𝑣) ↔ ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑋 × 𝑣)))
124 opelxp2 5704 . . . . . . . . . . . . . . . 16 (⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑋 × 𝑣) → (𝐺𝑘) ∈ 𝑣)
125123, 124biimtrdi 256 . . . . . . . . . . . . . . 15 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑋 × 𝑣) → (𝐺𝑘) ∈ 𝑣))
12643, 125syl 18 . . . . . . . . . . . . . 14 ((𝑗𝑍𝑘 ∈ (ℤ𝑗)) → ((𝐻𝑘) ∈ (𝑋 × 𝑣) → (𝐺𝑘) ∈ 𝑣))
127126ralimdva 3177 . . . . . . . . . . . . 13 (𝑗𝑍 → (∀𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣) → ∀𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
128127reximia 3100 . . . . . . . . . . . 12 (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)
129128a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
130122, 129imim12d 82 . . . . . . . . . 10 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → ((⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣)) → (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
131119, 130syld 48 . . . . . . . . 9 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
132131anassrs 472 . . . . . . . 8 (((𝜑𝑅𝑋) ∧ 𝑣𝐾) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
133132ralrimdva 3165 . . . . . . 7 ((𝜑𝑅𝑋) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
134133adantrr 729 . . . . . 6 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
135105, 134jcad 521 . . . . 5 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))))
13675, 135impbid 215 . . . 4 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ↔ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
137136pm5.32da 589 . . 3 (𝜑 → (((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))) ↔ ((𝑅𝑋𝑆𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))))
138 opelxp 5697 . . . 4 (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ↔ (𝑅𝑋𝑆𝑌))
139138anbi1i 635 . . 3 ((⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)) ↔ ((𝑅𝑋𝑆𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
140137, 139bitr4di 292 . 2 (𝜑 → (((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))))
141 txlm.m . . . . 5 (𝜑𝑀 ∈ ℤ)
142 txlm.f . . . . 5 (𝜑𝐹:𝑍𝑋)
143 eqidd 2764 . . . . 5 ((𝜑𝑘𝑍) → (𝐹𝑘) = (𝐹𝑘))
1446, 41, 141, 142, 143lmbrf 23426 . . . 4 (𝜑 → (𝐹(⇝𝑡𝐽)𝑅 ↔ (𝑅𝑋 ∧ ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))))
145 txlm.g . . . . 5 (𝜑𝐺:𝑍𝑌)
146 eqidd 2764 . . . . 5 ((𝜑𝑘𝑍) → (𝐺𝑘) = (𝐺𝑘))
1479, 41, 141, 145, 146lmbrf 23426 . . . 4 (𝜑 → (𝐺(⇝𝑡𝐾)𝑆 ↔ (𝑆𝑌 ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))))
148144, 147anbi12d 643 . . 3 (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ ((𝑅𝑋 ∧ ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)) ∧ (𝑆𝑌 ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))))
149 an4 668 . . 3 (((𝑅𝑋 ∧ ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)) ∧ (𝑆𝑌 ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))) ↔ ((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))))
150148, 149bitrdi 290 . 2 (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ ((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))))
151 txtopon 23757 . . . 4 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐾 ∈ (TopOn‘𝑌)) → (𝐽 ×t 𝐾) ∈ (TopOn‘(𝑋 × 𝑌)))
1526, 9, 151syl2anc 595 . . 3 (𝜑 → (𝐽 ×t 𝐾) ∈ (TopOn‘(𝑋 × 𝑌)))
153142ffvelcdmda 7079 . . . . 5 ((𝜑𝑛𝑍) → (𝐹𝑛) ∈ 𝑋)
154145ffvelcdmda 7079 . . . . 5 ((𝜑𝑛𝑍) → (𝐺𝑛) ∈ 𝑌)
155153, 154opelxpd 5700 . . . 4 ((𝜑𝑛𝑍) → ⟨(𝐹𝑛), (𝐺𝑛)⟩ ∈ (𝑋 × 𝑌))
156155, 48fmptd 7109 . . 3 (𝜑𝐻:𝑍⟶(𝑋 × 𝑌))
157 eqidd 2764 . . 3 ((𝜑𝑘𝑍) → (𝐻𝑘) = (𝐻𝑘))
158152, 41, 141, 156, 157lmbrf 23426 . 2 (𝜑 → (𝐻(⇝𝑡‘(𝐽 ×t 𝐾))⟨𝑅, 𝑆⟩ ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))))
159140, 150, 1583bitr4d 314 1 (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ 𝐻(⇝𝑡‘(𝐽 ×t 𝐾))⟨𝑅, 𝑆⟩))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 400   = wceq 1570  wcel 2143  wral 3079  wrex 3089  Vcvv 3455  wss 3905  cop 4595   class class class wbr 5109  cmpt 5192   × cxp 5659  ran crn 5662  wf 6532  cfv 6536  (class class class)co 7410  cmpo 7412  cz 12595  cuz 12866  topGenctg 17494  Topctop 23059  TopOnctopon 23076  𝑡clm 23392   ×t ctx 23726
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11160  ax-resscn 11161  ax-pre-lttri 11178  ax-pre-lttrn 11179
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-id 5556  df-po 5569  df-so 5570  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-ov 7413  df-oprab 7414  df-mpo 7415  df-1st 7982  df-2nd 7983  df-er 8690  df-pm 8823  df-en 8940  df-dom 8941  df-sdom 8942  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-neg 11448  df-z 12596  df-uz 12867  df-topgen 17500  df-top 23060  df-topon 23077  df-bases 23112  df-lm 23395  df-tx 23728
This theorem is used by:  lmcn2  23815
  Copyright terms: Public domain W3C validator