Theorem iinfssclem1 50499

Description: Lemma for iinfssc 50502. (Contributed by Zhi Wang, 31-Oct-2025.)

Hypotheses

Ref	Expression
iinfssc.1	⊢ (𝜑 → 𝐴 ≠ ∅)
iinfssc.2	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐻 ⊆cat 𝐽)
iinfssc.3	⊢ (𝜑 → 𝐾 = (𝑦 ∈ ∩ 𝑥 ∈ 𝐴 dom 𝐻 ↦ ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦)))
iinfssclem1.4	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑆 = dom dom 𝐻)
iinfssclem1.5	⊢ Ⅎ𝑥𝜑

Assertion

Ref	Expression
iinfssclem1	⊢ (𝜑 → 𝐾 = (𝑧 ∈ ∩ 𝑥 ∈ 𝐴 𝑆, 𝑤 ∈ ∩ 𝑥 ∈ 𝐴 𝑆 ↦ ∩ 𝑥 ∈ 𝐴 (𝑧𝐻𝑤)))

Distinct variable groups:   𝑤,𝐴,𝑥,𝑦,𝑧   𝑤,𝐻,𝑦,𝑧   𝑤,𝑆,𝑦,𝑧

Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑧, 𝑤)   𝑆(𝑥)   𝐻(𝑥)   𝐽(𝑥, 𝑦, 𝑧, 𝑤)   𝐾(𝑥, 𝑦, 𝑧, 𝑤)

Proof of Theorem iinfssclem1

Step	Hyp	Ref	Expression
1		iinfssc.3	. . 3 ⊢ (𝜑 → 𝐾 = (𝑦 ∈ ∩ 𝑥 ∈ 𝐴 dom 𝐻 ↦ ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦)))
2		iinfssclem1.5	. . . . . 6 ⊢ Ⅎ𝑥𝜑
3		iinfssc.2	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐻 ⊆cat 𝐽)
4		iinfssclem1.4	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑆 = dom dom 𝐻)
5	3, 4	sscfn1 18042	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐻 Fn (𝑆 × 𝑆))
6	5	fndmd 6674	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → dom 𝐻 = (𝑆 × 𝑆))
7	2, 6	iineq2d 4980	. . . . 5 ⊢ (𝜑 → ∩ 𝑥 ∈ 𝐴 dom 𝐻 = ∩ 𝑥 ∈ 𝐴 (𝑆 × 𝑆))
8		iinfssc.1	. . . . . 6 ⊢ (𝜑 → 𝐴 ≠ ∅)
9		iinxp 50273	. . . . . 6 ⊢ (𝐴 ≠ ∅ → ∩ 𝑥 ∈ 𝐴 (𝑆 × 𝑆) = (∩ 𝑥 ∈ 𝐴 𝑆 × ∩ 𝑥 ∈ 𝐴 𝑆))
10	8, 9	syl 18	. . . . 5 ⊢ (𝜑 → ∩ 𝑥 ∈ 𝐴 (𝑆 × 𝑆) = (∩ 𝑥 ∈ 𝐴 𝑆 × ∩ 𝑥 ∈ 𝐴 𝑆))
11	7, 10	eqtrd 2798	. . . 4 ⊢ (𝜑 → ∩ 𝑥 ∈ 𝐴 dom 𝐻 = (∩ 𝑥 ∈ 𝐴 𝑆 × ∩ 𝑥 ∈ 𝐴 𝑆))
12	11	mpteq1d 5201	. . 3 ⊢ (𝜑 → (𝑦 ∈ ∩ 𝑥 ∈ 𝐴 dom 𝐻 ↦ ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦)) = (𝑦 ∈ (∩ 𝑥 ∈ 𝐴 𝑆 × ∩ 𝑥 ∈ 𝐴 𝑆) ↦ ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦)))
13	1, 12	eqtrd 2798	. 2 ⊢ (𝜑 → 𝐾 = (𝑦 ∈ (∩ 𝑥 ∈ 𝐴 𝑆 × ∩ 𝑥 ∈ 𝐴 𝑆) ↦ ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦)))
14		fveq2 6916	. . . . . 6 ⊢ (𝑦 = ⟨𝑧, 𝑤⟩ → (𝐻‘𝑦) = (𝐻‘⟨𝑧, 𝑤⟩))
15		df-ov 7454	. . . . . 6 ⊢ (𝑧𝐻𝑤) = (𝐻‘⟨𝑧, 𝑤⟩)
16	14, 15	eqtr4di 2816	. . . . 5 ⊢ (𝑦 = ⟨𝑧, 𝑤⟩ → (𝐻‘𝑦) = (𝑧𝐻𝑤))
17	16	adantr 486	. . . 4 ⊢ ((𝑦 = ⟨𝑧, 𝑤⟩ ∧ 𝑥 ∈ 𝐴) → (𝐻‘𝑦) = (𝑧𝐻𝑤))
18	17	iineq2dv 4982	. . 3 ⊢ (𝑦 = ⟨𝑧, 𝑤⟩ → ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦) = ∩ 𝑥 ∈ 𝐴 (𝑧𝐻𝑤))
19	18	mpompt 7565	. 2 ⊢ (𝑦 ∈ (∩ 𝑥 ∈ 𝐴 𝑆 × ∩ 𝑥 ∈ 𝐴 𝑆) ↦ ∩ 𝑥 ∈ 𝐴 (𝐻‘𝑦)) = (𝑧 ∈ ∩ 𝑥 ∈ 𝐴 𝑆, 𝑤 ∈ ∩ 𝑥 ∈ 𝐴 𝑆 ↦ ∩ 𝑥 ∈ 𝐴 (𝑧𝐻𝑤))
20	13, 19	eqtrdi 2814	1 ⊢ (𝜑 → 𝐾 = (𝑧 ∈ ∩ 𝑥 ∈ 𝐴 𝑆, 𝑤 ∈ ∩ 𝑥 ∈ 𝐴 𝑆 ↦ ∩ 𝑥 ∈ 𝐴 (𝑧𝐻𝑤)))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570  Ⅎwnf 1816   ∈ wcel 2147   ≠ wne 2959  ∅c0 4281  ⟨cop 4840  ∩ ciin 4957   class class class wbr 5108   ↦ cmpt 5192   × cxp 5656  dom cdm 5658  ‘cfv 6566  (class class class)co 7451   ∈ cmpo 7453   ⊆_cat cssc 18032

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-iin 4959  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-ixp 8964  df-ssc 18035

This theorem is used by:  iinfssclem2  50500  iinfssclem3  50501  iinfssc  50502  infsubc2  50506  iinfconstbas  50511