Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  smfpimcclem Structured version   Visualization version   GIF version

Theorem smfpimcclem 44227
Description: Lemma for smfpimcc 44228 given the choice function 𝐶. (Contributed by Glauco Siliprandi, 23-Oct-2021.)
Hypotheses
Ref Expression
smfpimcclem.n 𝑛𝜑
smfpimcclem.z 𝑍𝑉
smfpimcclem.s (𝜑𝑆𝑊)
smfpimcclem.c ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦)
smfpimcclem.h 𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
Assertion
Ref Expression
smfpimcclem (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
Distinct variable groups:   𝐴,   𝐴,𝑠,𝑦   𝐶,𝑠,𝑦   ,𝐹   𝐹,𝑠,𝑦   ,𝐻   𝑆,,𝑛   𝑆,𝑠,𝑦,𝑛   ,𝑍,𝑛   𝑦,𝑍   𝜑,𝑦
Allowed substitution hints:   𝜑(,𝑛,𝑠)   𝐴(𝑛)   𝐶(,𝑛)   𝐹(𝑛)   𝐻(𝑦,𝑛,𝑠)   𝑉(𝑦,,𝑛,𝑠)   𝑊(𝑦,,𝑛,𝑠)   𝑍(𝑠)

Proof of Theorem smfpimcclem
StepHypRef Expression
1 smfpimcclem.n . . 3 𝑛𝜑
2 nfcv 2906 . . . . 5 𝑠𝑆
32ssrab2f 42555 . . . 4 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ⊆ 𝑆
4 eqid 2738 . . . . . . 7 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
5 smfpimcclem.s . . . . . . 7 (𝜑𝑆𝑊)
64, 5rabexd 5252 . . . . . 6 (𝜑 → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
76adantr 480 . . . . 5 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
8 simpl 482 . . . . . 6 ((𝜑𝑛𝑍) → 𝜑)
9 simpr 484 . . . . . . 7 ((𝜑𝑛𝑍) → 𝑛𝑍)
10 eqid 2738 . . . . . . . 8 (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) = (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1110elrnmpt1 5856 . . . . . . 7 ((𝑛𝑍 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
129, 7, 11syl2anc 583 . . . . . 6 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
138, 12jca 511 . . . . 5 ((𝜑𝑛𝑍) → (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
14 eleq1 2826 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ↔ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
1514anbi2d 628 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ↔ (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))))
16 fveq2 6756 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝐶𝑦) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
17 id 22 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → 𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1816, 17eleq12d 2833 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝐶𝑦) ∈ 𝑦 ↔ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
1915, 18imbi12d 344 . . . . . 6 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦) ↔ ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
20 smfpimcclem.c . . . . . 6 ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦)
2119, 20vtoclg 3495 . . . . 5 ({𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V → ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
227, 13, 21sylc 65 . . . 4 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
233, 22sselid 3915 . . 3 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆)
24 smfpimcclem.h . . 3 𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
251, 23, 24fmptdf 6973 . 2 (𝜑𝐻:𝑍𝑆)
26 nfcv 2906 . . . . . . . . 9 𝑠𝐶
27 nfrab1 3310 . . . . . . . . 9 𝑠{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
2826, 27nffv 6766 . . . . . . . 8 𝑠(𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
29 nfcv 2906 . . . . . . . . 9 𝑠((𝐹𝑛) “ 𝐴)
30 nfcv 2906 . . . . . . . . . 10 𝑠dom (𝐹𝑛)
3128, 30nfin 4147 . . . . . . . . 9 𝑠((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
3229, 31nfeq 2919 . . . . . . . 8 𝑠((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
33 ineq1 4136 . . . . . . . . 9 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (𝑠 ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3433eqeq2d 2749 . . . . . . . 8 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3528, 2, 32, 34elrabf 3613 . . . . . . 7 ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ↔ ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3622, 35sylib 217 . . . . . 6 ((𝜑𝑛𝑍) → ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3736simprd 495 . . . . 5 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3824a1i 11 . . . . . . 7 (𝜑𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
3922elexd 3442 . . . . . . 7 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ V)
4038, 39fvmpt2d 6870 . . . . . 6 ((𝜑𝑛𝑍) → (𝐻𝑛) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
4140ineq1d 4142 . . . . 5 ((𝜑𝑛𝑍) → ((𝐻𝑛) ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
4237, 41eqtr4d 2781 . . . 4 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
4342ex 412 . . 3 (𝜑 → (𝑛𝑍 → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
441, 43ralrimi 3139 . 2 (𝜑 → ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
45 smfpimcclem.z . . . . . 6 𝑍𝑉
4645elexi 3441 . . . . 5 𝑍 ∈ V
4746mptex 7081 . . . 4 (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ∈ V
4824, 47eqeltri 2835 . . 3 𝐻 ∈ V
49 feq1 6565 . . . 4 ( = 𝐻 → (:𝑍𝑆𝐻:𝑍𝑆))
50 nfcv 2906 . . . . . 6 𝑛
51 nfmpt1 5178 . . . . . . 7 𝑛(𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
5224, 51nfcxfr 2904 . . . . . 6 𝑛𝐻
5350, 52nfeq 2919 . . . . 5 𝑛 = 𝐻
54 fveq1 6755 . . . . . . 7 ( = 𝐻 → (𝑛) = (𝐻𝑛))
5554ineq1d 4142 . . . . . 6 ( = 𝐻 → ((𝑛) ∩ dom (𝐹𝑛)) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
5655eqeq2d 2749 . . . . 5 ( = 𝐻 → (((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5753, 56ralbid 3158 . . . 4 ( = 𝐻 → (∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5849, 57anbi12d 630 . . 3 ( = 𝐻 → ((:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))) ↔ (𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))))
5948, 58spcev 3535 . 2 ((𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))) → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
6025, 44, 59syl2anc 583 1 (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1539  wex 1783  wnf 1787  wcel 2108  wral 3063  {crab 3067  Vcvv 3422  cin 3882  cmpt 5153  ccnv 5579  dom cdm 5580  ran crn 5581  cima 5583  wf 6414  cfv 6418
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pr 5347
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4254  df-if 4457  df-sn 4559  df-pr 4561  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-id 5480  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426
This theorem is referenced by:  smfpimcc  44228
  Copyright terms: Public domain W3C validator