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 45134
Description: Lemma for smfpimcc 45135 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 2904 . . . . 5 𝑠𝑆
32ssrab2f 43415 . . . 4 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ⊆ 𝑆
4 eqid 2733 . . . . . . 7 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
5 smfpimcclem.s . . . . . . 7 (𝜑𝑆𝑊)
64, 5rabexd 5291 . . . . . 6 (𝜑 → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
76adantr 482 . . . . 5 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
8 simpl 484 . . . . . 6 ((𝜑𝑛𝑍) → 𝜑)
9 simpr 486 . . . . . . 7 ((𝜑𝑛𝑍) → 𝑛𝑍)
10 eqid 2733 . . . . . . . 8 (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) = (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1110elrnmpt1 5914 . . . . . . 7 ((𝑛𝑍 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
129, 7, 11syl2anc 585 . . . . . 6 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
138, 12jca 513 . . . . 5 ((𝜑𝑛𝑍) → (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
14 eleq1 2822 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ↔ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
1514anbi2d 630 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ↔ (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))))
16 fveq2 6843 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝐶𝑦) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
17 id 22 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → 𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1816, 17eleq12d 2828 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝐶𝑦) ∈ 𝑦 ↔ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
1915, 18imbi12d 345 . . . . . 6 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦) ↔ ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
20 smfpimcclem.c . . . . . 6 ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦)
2119, 20vtoclg 3524 . . . . 5 ({𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V → ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
227, 13, 21sylc 65 . . . 4 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
233, 22sselid 3943 . . 3 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆)
24 smfpimcclem.h . . 3 𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
251, 23, 24fmptdf 7066 . 2 (𝜑𝐻:𝑍𝑆)
26 nfcv 2904 . . . . . . . . 9 𝑠𝐶
27 nfrab1 3425 . . . . . . . . 9 𝑠{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
2826, 27nffv 6853 . . . . . . . 8 𝑠(𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
29 nfcv 2904 . . . . . . . . 9 𝑠((𝐹𝑛) “ 𝐴)
30 nfcv 2904 . . . . . . . . . 10 𝑠dom (𝐹𝑛)
3128, 30nfin 4177 . . . . . . . . 9 𝑠((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
3229, 31nfeq 2917 . . . . . . . 8 𝑠((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
33 ineq1 4166 . . . . . . . . 9 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (𝑠 ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3433eqeq2d 2744 . . . . . . . 8 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3528, 2, 32, 34elrabf 3642 . . . . . . 7 ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ↔ ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3622, 35sylib 217 . . . . . 6 ((𝜑𝑛𝑍) → ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3736simprd 497 . . . . 5 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3824a1i 11 . . . . . . 7 (𝜑𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
3922elexd 3464 . . . . . . 7 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ V)
4038, 39fvmpt2d 6962 . . . . . 6 ((𝜑𝑛𝑍) → (𝐻𝑛) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
4140ineq1d 4172 . . . . 5 ((𝜑𝑛𝑍) → ((𝐻𝑛) ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
4237, 41eqtr4d 2776 . . . 4 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
4342ex 414 . . 3 (𝜑 → (𝑛𝑍 → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
441, 43ralrimi 3239 . 2 (𝜑 → ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
45 smfpimcclem.z . . . . . 6 𝑍𝑉
4645elexi 3463 . . . . 5 𝑍 ∈ V
4746mptex 7174 . . . 4 (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ∈ V
4824, 47eqeltri 2830 . . 3 𝐻 ∈ V
49 feq1 6650 . . . 4 ( = 𝐻 → (:𝑍𝑆𝐻:𝑍𝑆))
50 nfcv 2904 . . . . . 6 𝑛
51 nfmpt1 5214 . . . . . . 7 𝑛(𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
5224, 51nfcxfr 2902 . . . . . 6 𝑛𝐻
5350, 52nfeq 2917 . . . . 5 𝑛 = 𝐻
54 fveq1 6842 . . . . . . 7 ( = 𝐻 → (𝑛) = (𝐻𝑛))
5554ineq1d 4172 . . . . . 6 ( = 𝐻 → ((𝑛) ∩ dom (𝐹𝑛)) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
5655eqeq2d 2744 . . . . 5 ( = 𝐻 → (((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5753, 56ralbid 3255 . . . 4 ( = 𝐻 → (∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5849, 57anbi12d 632 . . 3 ( = 𝐻 → ((:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))) ↔ (𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))))
5948, 58spcev 3564 . 2 ((𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))) → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
6025, 44, 59syl2anc 585 1 (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 397   = wceq 1542  wex 1782  wnf 1786  wcel 2107  wral 3061  {crab 3406  Vcvv 3444  cin 3910  cmpt 5189  ccnv 5633  dom cdm 5634  ran crn 5635  cima 5637  wf 6493  cfv 6497
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 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5243  ax-sep 5257  ax-nul 5264  ax-pr 5385
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2941  df-ral 3062  df-rex 3071  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3741  df-csb 3857  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-nul 4284  df-if 4488  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4867  df-iun 4957  df-br 5107  df-opab 5169  df-mpt 5190  df-id 5532  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-iota 6449  df-fun 6499  df-fn 6500  df-f 6501  df-f1 6502  df-fo 6503  df-f1o 6504  df-fv 6505
This theorem is referenced by:  smfpimcc  45135
  Copyright terms: Public domain W3C validator