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 47380
Description: Lemma for smfpimcc 47381 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 2927 . . . . 5 𝑠𝑆
32ssrab2f 45694 . . . 4 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ⊆ 𝑆
4 eqid 2765 . . . . . . 7 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
5 smfpimcclem.s . . . . . . 7 (𝜑𝑆𝑊)
64, 5rabexd 5300 . . . . . 6 (𝜑 → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
76adantr 485 . . . . 5 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
8 simpl 487 . . . . . 6 ((𝜑𝑛𝑍) → 𝜑)
9 simpr 489 . . . . . . 7 ((𝜑𝑛𝑍) → 𝑛𝑍)
10 eqid 2765 . . . . . . . 8 (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) = (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1110elrnmpt1 5940 . . . . . . 7 ((𝑛𝑍 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
129, 7, 11syl2anc 595 . . . . . 6 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
138, 12jca 520 . . . . 5 ((𝜑𝑛𝑍) → (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
14 eleq1 2853 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ↔ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
1514anbi2d 641 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ↔ (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))))
16 fveq2 6871 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝐶𝑦) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
17 id 23 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → 𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1816, 17eleq12d 2859 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝐶𝑦) ∈ 𝑦 ↔ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
1915, 18imbi12d 347 . . . . . 6 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦) ↔ ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
20 smfpimcclem.c . . . . . 6 ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦)
2119, 20vtoclg 3525 . . . . 5 ({𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V → ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
227, 13, 21sylc 66 . . . 4 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
233, 22sselid 3937 . . 3 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆)
24 smfpimcclem.h . . 3 𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
251, 23, 24fmptdf 7102 . 2 (𝜑𝐻:𝑍𝑆)
26 nfcv 2927 . . . . . . . . 9 𝑠𝐶
27 nfrab1 3437 . . . . . . . . 9 𝑠{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
2826, 27nffv 6881 . . . . . . . 8 𝑠(𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
29 nfcv 2927 . . . . . . . . 9 𝑠((𝐹𝑛) “ 𝐴)
30 nfcv 2927 . . . . . . . . . 10 𝑠dom (𝐹𝑛)
3128, 30nfin 4179 . . . . . . . . 9 𝑠((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
3229, 31nfeq 2940 . . . . . . . 8 𝑠((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
33 ineq1 4168 . . . . . . . . 9 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (𝑠 ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3433eqeq2d 2776 . . . . . . . 8 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3528, 2, 32, 34elrabf 3650 . . . . . . 7 ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ↔ ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3622, 35sylib 221 . . . . . 6 ((𝜑𝑛𝑍) → ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3736simprd 500 . . . . 5 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3824a1i 11 . . . . . . 7 (𝜑𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
3922elexd 3480 . . . . . . 7 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ V)
4038, 39fvmpt2d 6993 . . . . . 6 ((𝜑𝑛𝑍) → (𝐻𝑛) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
4140ineq1d 4174 . . . . 5 ((𝜑𝑛𝑍) → ((𝐻𝑛) ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
4237, 41eqtr4d 2803 . . . 4 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
4342ex 417 . . 3 (𝜑 → (𝑛𝑍 → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
441, 43ralrimi 3263 . 2 (𝜑 → ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
45 smfpimcclem.z . . . . . 6 𝑍𝑉
4645elexi 3479 . . . . 5 𝑍 ∈ V
4746mptex 7211 . . . 4 (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ∈ V
4824, 47eqeltri 2861 . . 3 𝐻 ∈ V
49 feq1 6673 . . . 4 ( = 𝐻 → (:𝑍𝑆𝐻:𝑍𝑆))
50 nfcv 2927 . . . . . 6 𝑛
51 nfmpt1 5203 . . . . . . 7 𝑛(𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
5224, 51nfcxfr 2925 . . . . . 6 𝑛𝐻
5350, 52nfeq 2940 . . . . 5 𝑛 = 𝐻
54 fveq1 6870 . . . . . . 7 ( = 𝐻 → (𝑛) = (𝐻𝑛))
5554ineq1d 4174 . . . . . 6 ( = 𝐻 → ((𝑛) ∩ dom (𝐹𝑛)) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
5655eqeq2d 2776 . . . . 5 ( = 𝐻 → (((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5753, 56ralbid 3278 . . . 4 ( = 𝐻 → (∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5849, 57anbi12d 643 . . 3 ( = 𝐻 → ((:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))) ↔ (𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))))
5948, 58spcev 3568 . 2 ((𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))) → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
6025, 44, 59syl2anc 595 1 (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 400   = wceq 1563  wex 1802  wnf 1806  wcel 2145  wral 3079  {crab 3417  Vcvv 3457  cin 3906  cmpt 5185  ccnv 5650  dom cdm 5651  ran crn 5652  cima 5654  wf 6521  cfv 6525
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-rep 5231  ax-sep 5250  ax-nul 5260  ax-pr 5394
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3080  df-rex 3090  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4868  df-iun 4953  df-br 5105  df-opab 5167  df-mpt 5186  df-id 5546  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533
This theorem is referenced by:  smfpimcc  47381
  Copyright terms: Public domain W3C validator