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 46789
Description: Lemma for smfpimcc 46790 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 2891 . . . . 5 𝑠𝑆
32ssrab2f 45095 . . . 4 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ⊆ 𝑆
4 eqid 2729 . . . . . . 7 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
5 smfpimcclem.s . . . . . . 7 (𝜑𝑆𝑊)
64, 5rabexd 5282 . . . . . 6 (𝜑 → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
76adantr 480 . . . . 5 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
8 simpl 482 . . . . . 6 ((𝜑𝑛𝑍) → 𝜑)
9 simpr 484 . . . . . . 7 ((𝜑𝑛𝑍) → 𝑛𝑍)
10 eqid 2729 . . . . . . . 8 (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) = (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1110elrnmpt1 5906 . . . . . . 7 ((𝑛𝑍 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
129, 7, 11syl2anc 584 . . . . . 6 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
138, 12jca 511 . . . . 5 ((𝜑𝑛𝑍) → (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
14 eleq1 2816 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ↔ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
1514anbi2d 630 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ↔ (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))))
16 fveq2 6826 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝐶𝑦) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
17 id 22 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → 𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1816, 17eleq12d 2822 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝐶𝑦) ∈ 𝑦 ↔ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
1915, 18imbi12d 344 . . . . . 6 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦) ↔ ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
20 smfpimcclem.c . . . . . 6 ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦)
2119, 20vtoclg 3511 . . . . 5 ({𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V → ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
227, 13, 21sylc 65 . . . 4 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
233, 22sselid 3935 . . 3 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆)
24 smfpimcclem.h . . 3 𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
251, 23, 24fmptdf 7055 . 2 (𝜑𝐻:𝑍𝑆)
26 nfcv 2891 . . . . . . . . 9 𝑠𝐶
27 nfrab1 3417 . . . . . . . . 9 𝑠{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
2826, 27nffv 6836 . . . . . . . 8 𝑠(𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
29 nfcv 2891 . . . . . . . . 9 𝑠((𝐹𝑛) “ 𝐴)
30 nfcv 2891 . . . . . . . . . 10 𝑠dom (𝐹𝑛)
3128, 30nfin 4177 . . . . . . . . 9 𝑠((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
3229, 31nfeq 2905 . . . . . . . 8 𝑠((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
33 ineq1 4166 . . . . . . . . 9 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (𝑠 ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3433eqeq2d 2740 . . . . . . . 8 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3528, 2, 32, 34elrabf 3646 . . . . . . 7 ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ↔ ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3622, 35sylib 218 . . . . . 6 ((𝜑𝑛𝑍) → ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3736simprd 495 . . . . 5 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3824a1i 11 . . . . . . 7 (𝜑𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
3922elexd 3462 . . . . . . 7 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ V)
4038, 39fvmpt2d 6947 . . . . . 6 ((𝜑𝑛𝑍) → (𝐻𝑛) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
4140ineq1d 4172 . . . . 5 ((𝜑𝑛𝑍) → ((𝐻𝑛) ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
4237, 41eqtr4d 2767 . . . 4 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
4342ex 412 . . 3 (𝜑 → (𝑛𝑍 → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
441, 43ralrimi 3227 . 2 (𝜑 → ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
45 smfpimcclem.z . . . . . 6 𝑍𝑉
4645elexi 3461 . . . . 5 𝑍 ∈ V
4746mptex 7163 . . . 4 (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ∈ V
4824, 47eqeltri 2824 . . 3 𝐻 ∈ V
49 feq1 6634 . . . 4 ( = 𝐻 → (:𝑍𝑆𝐻:𝑍𝑆))
50 nfcv 2891 . . . . . 6 𝑛
51 nfmpt1 5194 . . . . . . 7 𝑛(𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
5224, 51nfcxfr 2889 . . . . . 6 𝑛𝐻
5350, 52nfeq 2905 . . . . 5 𝑛 = 𝐻
54 fveq1 6825 . . . . . . 7 ( = 𝐻 → (𝑛) = (𝐻𝑛))
5554ineq1d 4172 . . . . . 6 ( = 𝐻 → ((𝑛) ∩ dom (𝐹𝑛)) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
5655eqeq2d 2740 . . . . 5 ( = 𝐻 → (((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5753, 56ralbid 3242 . . . 4 ( = 𝐻 → (∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5849, 57anbi12d 632 . . 3 ( = 𝐻 → ((:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))) ↔ (𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))))
5948, 58spcev 3563 . 2 ((𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))) → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
6025, 44, 59syl2anc 584 1 (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1540  wex 1779  wnf 1783  wcel 2109  wral 3044  {crab 3396  Vcvv 3438  cin 3904  cmpt 5176  ccnv 5622  dom cdm 5623  ran crn 5624  cima 5626  wf 6482  cfv 6486
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pr 5374
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-ral 3045  df-rex 3054  df-reu 3346  df-rab 3397  df-v 3440  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4862  df-iun 4946  df-br 5096  df-opab 5158  df-mpt 5177  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494
This theorem is referenced by:  smfpimcc  46790
  Copyright terms: Public domain W3C validator