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

Theorem txlm 22799
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 3115 . . . . . . . 8 ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑢𝐽 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
2 r19.28v 3116 . . . . . . . . 9 (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
32ralimi 3087 . . . . . . . 8 (∀𝑢𝐽 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
41, 3syl 17 . . . . . . 7 ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
5 simprl 768 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → 𝑤 ∈ (𝐽 ×t 𝐾))
6 txlm.j . . . . . . . . . . . . . . . . . 18 (𝜑𝐽 ∈ (TopOn‘𝑋))
7 topontop 22062 . . . . . . . . . . . . . . . . . 18 (𝐽 ∈ (TopOn‘𝑋) → 𝐽 ∈ Top)
86, 7syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝐽 ∈ Top)
9 txlm.k . . . . . . . . . . . . . . . . . 18 (𝜑𝐾 ∈ (TopOn‘𝑌))
10 topontop 22062 . . . . . . . . . . . . . . . . . 18 (𝐾 ∈ (TopOn‘𝑌) → 𝐾 ∈ Top)
119, 10syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝐾 ∈ Top)
12 eqid 2738 . . . . . . . . . . . . . . . . . 18 ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣)) = ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))
1312txval 22715 . . . . . . . . . . . . . . . . 17 ((𝐽 ∈ Top ∧ 𝐾 ∈ Top) → (𝐽 ×t 𝐾) = (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
148, 11, 13syl2anc 584 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐽 ×t 𝐾) = (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
1514adantr 481 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → (𝐽 ×t 𝐾) = (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
165, 15eleqtrd 2841 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → 𝑤 ∈ (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))))
17 simprr 770 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → ⟨𝑅, 𝑆⟩ ∈ 𝑤)
18 tg2 22115 . . . . . . . . . . . . . 14 ((𝑤 ∈ (topGen‘ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤) → ∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤))
1916, 17, 18syl2anc 584 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → ∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤))
20 vex 3436 . . . . . . . . . . . . . . . 16 𝑢 ∈ V
21 vex 3436 . . . . . . . . . . . . . . . 16 𝑣 ∈ V
2220, 21xpex 7603 . . . . . . . . . . . . . . 15 (𝑢 × 𝑣) ∈ V
2322rgen2w 3077 . . . . . . . . . . . . . 14 𝑢𝐽𝑣𝐾 (𝑢 × 𝑣) ∈ V
24 eqid 2738 . . . . . . . . . . . . . . 15 (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣)) = (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))
25 eleq2 2827 . . . . . . . . . . . . . . . 16 (𝑡 = (𝑢 × 𝑣) → (⟨𝑅, 𝑆⟩ ∈ 𝑡 ↔ ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣)))
26 sseq1 3946 . . . . . . . . . . . . . . . 16 (𝑡 = (𝑢 × 𝑣) → (𝑡𝑤 ↔ (𝑢 × 𝑣) ⊆ 𝑤))
2725, 26anbi12d 631 . . . . . . . . . . . . . . 15 (𝑡 = (𝑢 × 𝑣) → ((⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
2824, 27rexrnmpo 7413 . . . . . . . . . . . . . 14 (∀𝑢𝐽𝑣𝐾 (𝑢 × 𝑣) ∈ V → (∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤) ↔ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
2923, 28ax-mp 5 . . . . . . . . . . . . 13 (∃𝑡 ∈ ran (𝑢𝐽, 𝑣𝐾 ↦ (𝑢 × 𝑣))(⟨𝑅, 𝑆⟩ ∈ 𝑡𝑡𝑤) ↔ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤))
3019, 29sylib 217 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤)) → ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤))
3130ex 413 . . . . . . . . . . 11 (𝜑 → ((𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤) → ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
32 r19.29 3184 . . . . . . . . . . . . 13 ((∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑢𝐽 (∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
33 r19.29 3184 . . . . . . . . . . . . . . 15 ((∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑣𝐾 (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)))
34 simprl 768 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣))
35 opelxp 5625 . . . . . . . . . . . . . . . . . . . . 21 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ↔ (𝑅𝑢𝑆𝑣))
3634, 35sylib 217 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (𝑅𝑢𝑆𝑣))
37 pm2.27 42 . . . . . . . . . . . . . . . . . . . . 21 (𝑅𝑢 → ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))
38 pm2.27 42 . . . . . . . . . . . . . . . . . . . . 21 (𝑆𝑣 → ((𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
3937, 38im2anan9 620 . . . . . . . . . . . . . . . . . . . 20 ((𝑅𝑢𝑆𝑣) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
4036, 39syl 17 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
41 txlm.z . . . . . . . . . . . . . . . . . . . . 21 𝑍 = (ℤ𝑀)
4241rexanuz2 15061 . . . . . . . . . . . . . . . . . . . 20 (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) ↔ (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
4341uztrn2 12601 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑗𝑍𝑘 ∈ (ℤ𝑗)) → 𝑘𝑍)
44 opelxpi 5626 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑣))
45 fveq2 6774 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
46 fveq2 6774 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑛 = 𝑘 → (𝐺𝑛) = (𝐺𝑘))
4745, 46opeq12d 4812 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 𝑘 → ⟨(𝐹𝑛), (𝐺𝑛)⟩ = ⟨(𝐹𝑘), (𝐺𝑘)⟩)
48 txlm.h . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 𝐻 = (𝑛𝑍 ↦ ⟨(𝐹𝑛), (𝐺𝑛)⟩)
49 opex 5379 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ V
5047, 48, 49fvmpt 6875 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘𝑍 → (𝐻𝑘) = ⟨(𝐹𝑘), (𝐺𝑘)⟩)
5150eleq1d 2823 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑢 × 𝑣) ↔ ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑣)))
5244, 51syl5ibr 245 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘𝑍 → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ (𝑢 × 𝑣)))
5352adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ (𝑢 × 𝑣)))
54 simplrr 775 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → (𝑢 × 𝑣) ⊆ 𝑤)
5554sseld 3920 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → ((𝐻𝑘) ∈ (𝑢 × 𝑣) → (𝐻𝑘) ∈ 𝑤))
5653, 55syld 47 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑘𝑍) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ 𝑤))
5743, 56sylan2 593 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ (𝑗𝑍𝑘 ∈ (ℤ𝑗))) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ 𝑤))
5857anassrs 468 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑗𝑍) ∧ 𝑘 ∈ (ℤ𝑗)) → (((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → (𝐻𝑘) ∈ 𝑤))
5958ralimdva 3108 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) ∧ 𝑗𝑍) → (∀𝑘 ∈ (ℤ𝑗)((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → ∀𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6059reximdva 3203 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)((𝐹𝑘) ∈ 𝑢 ∧ (𝐺𝑘) ∈ 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6142, 60syl5bir 242 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ((∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢 ∧ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6240, 61syld 47 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑢𝐽) ∧ 𝑣𝐾) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6362ex 413 . . . . . . . . . . . . . . . . 17 (((𝜑𝑢𝐽) ∧ 𝑣𝐾) → ((⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤) → (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
6463impcomd 412 . . . . . . . . . . . . . . . 16 (((𝜑𝑢𝐽) ∧ 𝑣𝐾) → ((((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6564rexlimdva 3213 . . . . . . . . . . . . . . 15 ((𝜑𝑢𝐽) → (∃𝑣𝐾 (((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6633, 65syl5 34 . . . . . . . . . . . . . 14 ((𝜑𝑢𝐽) → ((∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6766rexlimdva 3213 . . . . . . . . . . . . 13 (𝜑 → (∃𝑢𝐽 (∀𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6832, 67syl5 34 . . . . . . . . . . . 12 (𝜑 → ((∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ∧ ∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))
6968expcomd 417 . . . . . . . . . . 11 (𝜑 → (∃𝑢𝐽𝑣𝐾 (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑣) ∧ (𝑢 × 𝑣) ⊆ 𝑤) → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7031, 69syld 47 . . . . . . . . . 10 (𝜑 → ((𝑤 ∈ (𝐽 ×t 𝐾) ∧ ⟨𝑅, 𝑆⟩ ∈ 𝑤) → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7170expdimp 453 . . . . . . . . 9 ((𝜑𝑤 ∈ (𝐽 ×t 𝐾)) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7271com23 86 . . . . . . . 8 ((𝜑𝑤 ∈ (𝐽 ×t 𝐾)) → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7372ralrimdva 3106 . . . . . . 7 (𝜑 → (∀𝑢𝐽𝑣𝐾 ((𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
744, 73syl5 34 . . . . . 6 (𝜑 → ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
7574adantr 481 . . . . 5 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) → ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
768adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝐽 ∈ Top)
7711adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝐾 ∈ Top)
78 simprr 770 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝑢𝐽)
79 toponmax 22075 . . . . . . . . . . . . . 14 (𝐾 ∈ (TopOn‘𝑌) → 𝑌𝐾)
809, 79syl 17 . . . . . . . . . . . . 13 (𝜑𝑌𝐾)
8180adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝑌𝐾)
82 txopn 22753 . . . . . . . . . . . 12 (((𝐽 ∈ Top ∧ 𝐾 ∈ Top) ∧ (𝑢𝐽𝑌𝐾)) → (𝑢 × 𝑌) ∈ (𝐽 ×t 𝐾))
8376, 77, 78, 81, 82syl22anc 836 . . . . . . . . . . 11 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (𝑢 × 𝑌) ∈ (𝐽 ×t 𝐾))
84 eleq2 2827 . . . . . . . . . . . . 13 (𝑤 = (𝑢 × 𝑌) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 ↔ ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌)))
85 eleq2 2827 . . . . . . . . . . . . . 14 (𝑤 = (𝑢 × 𝑌) → ((𝐻𝑘) ∈ 𝑤 ↔ (𝐻𝑘) ∈ (𝑢 × 𝑌)))
8685rexralbidv 3230 . . . . . . . . . . . . 13 (𝑤 = (𝑢 × 𝑌) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤 ↔ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌)))
8784, 86imbi12d 345 . . . . . . . . . . . 12 (𝑤 = (𝑢 × 𝑌) → ((⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌))))
8887rspcv 3557 . . . . . . . . . . 11 ((𝑢 × 𝑌) ∈ (𝐽 ×t 𝐾) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌))))
8983, 88syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌))))
90 simprl 768 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → 𝑆𝑌)
91 opelxpi 5626 . . . . . . . . . . . . 13 ((𝑅𝑢𝑆𝑌) → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌))
9290, 91sylan2 593 . . . . . . . . . . . 12 ((𝑅𝑢 ∧ (𝜑 ∧ (𝑆𝑌𝑢𝐽))) → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌))
9392expcom 414 . . . . . . . . . . 11 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (𝑅𝑢 → ⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌)))
9450eleq1d 2823 . . . . . . . . . . . . . . . 16 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑢 × 𝑌) ↔ ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑌)))
95 opelxp1 5630 . . . . . . . . . . . . . . . 16 (⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑢 × 𝑌) → (𝐹𝑘) ∈ 𝑢)
9694, 95syl6bi 252 . . . . . . . . . . . . . . 15 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑢 × 𝑌) → (𝐹𝑘) ∈ 𝑢))
9743, 96syl 17 . . . . . . . . . . . . . 14 ((𝑗𝑍𝑘 ∈ (ℤ𝑗)) → ((𝐻𝑘) ∈ (𝑢 × 𝑌) → (𝐹𝑘) ∈ 𝑢))
9897ralimdva 3108 . . . . . . . . . . . . 13 (𝑗𝑍 → (∀𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌) → ∀𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))
9998reximia 3176 . . . . . . . . . . . 12 (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)
10099a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))
10193, 100imim12d 81 . . . . . . . . . 10 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → ((⟨𝑅, 𝑆⟩ ∈ (𝑢 × 𝑌) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑢 × 𝑌)) → (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
10289, 101syld 47 . . . . . . . . 9 ((𝜑 ∧ (𝑆𝑌𝑢𝐽)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
103102anassrs 468 . . . . . . . 8 (((𝜑𝑆𝑌) ∧ 𝑢𝐽) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
104103ralrimdva 3106 . . . . . . 7 ((𝜑𝑆𝑌) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
105104adantrl 713 . . . . . 6 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)))
1068adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝐽 ∈ Top)
10711adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝐾 ∈ Top)
108 toponmax 22075 . . . . . . . . . . . . . 14 (𝐽 ∈ (TopOn‘𝑋) → 𝑋𝐽)
1096, 108syl 17 . . . . . . . . . . . . 13 (𝜑𝑋𝐽)
110109adantr 481 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝑋𝐽)
111 simprr 770 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → 𝑣𝐾)
112 txopn 22753 . . . . . . . . . . . 12 (((𝐽 ∈ Top ∧ 𝐾 ∈ Top) ∧ (𝑋𝐽𝑣𝐾)) → (𝑋 × 𝑣) ∈ (𝐽 ×t 𝐾))
113106, 107, 110, 111, 112syl22anc 836 . . . . . . . . . . 11 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (𝑋 × 𝑣) ∈ (𝐽 ×t 𝐾))
114 eleq2 2827 . . . . . . . . . . . . 13 (𝑤 = (𝑋 × 𝑣) → (⟨𝑅, 𝑆⟩ ∈ 𝑤 ↔ ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣)))
115 eleq2 2827 . . . . . . . . . . . . . 14 (𝑤 = (𝑋 × 𝑣) → ((𝐻𝑘) ∈ 𝑤 ↔ (𝐻𝑘) ∈ (𝑋 × 𝑣)))
116115rexralbidv 3230 . . . . . . . . . . . . 13 (𝑤 = (𝑋 × 𝑣) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤 ↔ ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣)))
117114, 116imbi12d 345 . . . . . . . . . . . 12 (𝑤 = (𝑋 × 𝑣) → ((⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣))))
118117rspcv 3557 . . . . . . . . . . 11 ((𝑋 × 𝑣) ∈ (𝐽 ×t 𝐾) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣))))
119113, 118syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣))))
120 opelxpi 5626 . . . . . . . . . . . . 13 ((𝑅𝑋𝑆𝑣) → ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣))
121120ex 413 . . . . . . . . . . . 12 (𝑅𝑋 → (𝑆𝑣 → ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣)))
122121ad2antrl 725 . . . . . . . . . . 11 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (𝑆𝑣 → ⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣)))
12350eleq1d 2823 . . . . . . . . . . . . . . . 16 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑋 × 𝑣) ↔ ⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑋 × 𝑣)))
124 opelxp2 5631 . . . . . . . . . . . . . . . 16 (⟨(𝐹𝑘), (𝐺𝑘)⟩ ∈ (𝑋 × 𝑣) → (𝐺𝑘) ∈ 𝑣)
125123, 124syl6bi 252 . . . . . . . . . . . . . . 15 (𝑘𝑍 → ((𝐻𝑘) ∈ (𝑋 × 𝑣) → (𝐺𝑘) ∈ 𝑣))
12643, 125syl 17 . . . . . . . . . . . . . 14 ((𝑗𝑍𝑘 ∈ (ℤ𝑗)) → ((𝐻𝑘) ∈ (𝑋 × 𝑣) → (𝐺𝑘) ∈ 𝑣))
127126ralimdva 3108 . . . . . . . . . . . . 13 (𝑗𝑍 → (∀𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣) → ∀𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
128127reximia 3176 . . . . . . . . . . . 12 (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)
129128a1i 11 . . . . . . . . . . 11 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))
130122, 129imim12d 81 . . . . . . . . . 10 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → ((⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑣) → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ (𝑋 × 𝑣)) → (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
131119, 130syld 47 . . . . . . . . 9 ((𝜑 ∧ (𝑅𝑋𝑣𝐾)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
132131anassrs 468 . . . . . . . 8 (((𝜑𝑅𝑋) ∧ 𝑣𝐾) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
133132ralrimdva 3106 . . . . . . 7 ((𝜑𝑅𝑋) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
134133adantrr 714 . . . . . 6 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))
135105, 134jcad 513 . . . . 5 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → (∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤) → (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))))
13675, 135impbid 211 . . . 4 ((𝜑 ∧ (𝑅𝑋𝑆𝑌)) → ((∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)) ↔ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
137136pm5.32da 579 . . 3 (𝜑 → (((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))) ↔ ((𝑅𝑋𝑆𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))))
138 opelxp 5625 . . . 4 (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ↔ (𝑅𝑋𝑆𝑌))
139138anbi1i 624 . . 3 ((⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)) ↔ ((𝑅𝑋𝑆𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤)))
140137, 139bitr4di 289 . 2 (𝜑 → (((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))) ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))))
141 txlm.m . . . . 5 (𝜑𝑀 ∈ ℤ)
142 txlm.f . . . . 5 (𝜑𝐹:𝑍𝑋)
143 eqidd 2739 . . . . 5 ((𝜑𝑘𝑍) → (𝐹𝑘) = (𝐹𝑘))
1446, 41, 141, 142, 143lmbrf 22411 . . . 4 (𝜑 → (𝐹(⇝𝑡𝐽)𝑅 ↔ (𝑅𝑋 ∧ ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢))))
145 txlm.g . . . . 5 (𝜑𝐺:𝑍𝑌)
146 eqidd 2739 . . . . 5 ((𝜑𝑘𝑍) → (𝐺𝑘) = (𝐺𝑘))
1479, 41, 141, 145, 146lmbrf 22411 . . . 4 (𝜑 → (𝐺(⇝𝑡𝐾)𝑆 ↔ (𝑆𝑌 ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))))
148144, 147anbi12d 631 . . 3 (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ ((𝑅𝑋 ∧ ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)) ∧ (𝑆𝑌 ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))))
149 an4 653 . . 3 (((𝑅𝑋 ∧ ∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢)) ∧ (𝑆𝑌 ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))) ↔ ((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣))))
150148, 149bitrdi 287 . 2 (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ ((𝑅𝑋𝑆𝑌) ∧ (∀𝑢𝐽 (𝑅𝑢 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐹𝑘) ∈ 𝑢) ∧ ∀𝑣𝐾 (𝑆𝑣 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐺𝑘) ∈ 𝑣)))))
151 txtopon 22742 . . . 4 ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐾 ∈ (TopOn‘𝑌)) → (𝐽 ×t 𝐾) ∈ (TopOn‘(𝑋 × 𝑌)))
1526, 9, 151syl2anc 584 . . 3 (𝜑 → (𝐽 ×t 𝐾) ∈ (TopOn‘(𝑋 × 𝑌)))
153142ffvelrnda 6961 . . . . 5 ((𝜑𝑛𝑍) → (𝐹𝑛) ∈ 𝑋)
154145ffvelrnda 6961 . . . . 5 ((𝜑𝑛𝑍) → (𝐺𝑛) ∈ 𝑌)
155153, 154opelxpd 5627 . . . 4 ((𝜑𝑛𝑍) → ⟨(𝐹𝑛), (𝐺𝑛)⟩ ∈ (𝑋 × 𝑌))
156155, 48fmptd 6988 . . 3 (𝜑𝐻:𝑍⟶(𝑋 × 𝑌))
157 eqidd 2739 . . 3 ((𝜑𝑘𝑍) → (𝐻𝑘) = (𝐻𝑘))
158152, 41, 141, 156, 157lmbrf 22411 . 2 (𝜑 → (𝐻(⇝𝑡‘(𝐽 ×t 𝐾))⟨𝑅, 𝑆⟩ ↔ (⟨𝑅, 𝑆⟩ ∈ (𝑋 × 𝑌) ∧ ∀𝑤 ∈ (𝐽 ×t 𝐾)(⟨𝑅, 𝑆⟩ ∈ 𝑤 → ∃𝑗𝑍𝑘 ∈ (ℤ𝑗)(𝐻𝑘) ∈ 𝑤))))
159140, 150, 1583bitr4d 311 1 (𝜑 → ((𝐹(⇝𝑡𝐽)𝑅𝐺(⇝𝑡𝐾)𝑆) ↔ 𝐻(⇝𝑡‘(𝐽 ×t 𝐾))⟨𝑅, 𝑆⟩))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396   = wceq 1539  wcel 2106  wral 3064  wrex 3065  Vcvv 3432  wss 3887  cop 4567   class class class wbr 5074  cmpt 5157   × cxp 5587  ran crn 5590  wf 6429  cfv 6433  (class class class)co 7275  cmpo 7277  cz 12319  cuz 12582  topGenctg 17148  Topctop 22042  TopOnctopon 22059  𝑡clm 22377   ×t ctx 22711
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-cnex 10927  ax-resscn 10928  ax-pre-lttri 10945  ax-pre-lttrn 10946
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-id 5489  df-po 5503  df-so 5504  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-ov 7278  df-oprab 7279  df-mpo 7280  df-1st 7831  df-2nd 7832  df-er 8498  df-pm 8618  df-en 8734  df-dom 8735  df-sdom 8736  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-neg 11208  df-z 12320  df-uz 12583  df-topgen 17154  df-top 22043  df-topon 22060  df-bases 22096  df-lm 22380  df-tx 22713
This theorem is referenced by:  lmcn2  22800
  Copyright terms: Public domain W3C validator