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 42958
Description: Lemma for smfpimcc 42959 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 2974 . . . . 5 𝑠𝑆
32ssrab2f 41260 . . . 4 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ⊆ 𝑆
4 eqid 2818 . . . . . . 7 {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
5 smfpimcclem.s . . . . . . 7 (𝜑𝑆𝑊)
64, 5rabexd 5227 . . . . . 6 (𝜑 → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
76adantr 481 . . . . 5 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V)
8 simpl 483 . . . . . 6 ((𝜑𝑛𝑍) → 𝜑)
9 simpr 485 . . . . . . 7 ((𝜑𝑛𝑍) → 𝑛𝑍)
10 eqid 2818 . . . . . . . 8 (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) = (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1110elrnmpt1 5823 . . . . . . 7 ((𝑛𝑍 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
129, 7, 11syl2anc 584 . . . . . 6 ((𝜑𝑛𝑍) → {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
138, 12jca 512 . . . . 5 ((𝜑𝑛𝑍) → (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
14 eleq1 2897 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ↔ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
1514anbi2d 628 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ↔ (𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))))
16 fveq2 6663 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (𝐶𝑦) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
17 id 22 . . . . . . . 8 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → 𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
1816, 17eleq12d 2904 . . . . . . 7 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → ((𝐶𝑦) ∈ 𝑦 ↔ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
1915, 18imbi12d 346 . . . . . 6 (𝑦 = {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} → (((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦) ↔ ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
20 smfpimcclem.c . . . . . 6 ((𝜑𝑦 ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶𝑦) ∈ 𝑦)
2119, 20vtoclg 3565 . . . . 5 ({𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ V → ((𝜑 ∧ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ∈ ran (𝑛𝑍 ↦ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
227, 13, 21sylc 65 . . . 4 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
233, 22sseldi 3962 . . 3 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆)
24 smfpimcclem.h . . 3 𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
251, 23, 24fmptdf 6873 . 2 (𝜑𝐻:𝑍𝑆)
26 nfcv 2974 . . . . . . . . 9 𝑠𝐶
27 nfrab1 3382 . . . . . . . . 9 𝑠{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}
2826, 27nffv 6673 . . . . . . . 8 𝑠(𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})
29 nfcv 2974 . . . . . . . . 9 𝑠((𝐹𝑛) “ 𝐴)
30 nfcv 2974 . . . . . . . . . 10 𝑠dom (𝐹𝑛)
3128, 30nfin 4190 . . . . . . . . 9 𝑠((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
3229, 31nfeq 2988 . . . . . . . 8 𝑠((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))
33 ineq1 4178 . . . . . . . . 9 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (𝑠 ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3433eqeq2d 2829 . . . . . . . 8 (𝑠 = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) → (((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3528, 2, 32, 34elrabf 3673 . . . . . . 7 ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ {𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))} ↔ ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3622, 35sylib 219 . . . . . 6 ((𝜑𝑛𝑍) → ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ 𝑆 ∧ ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛))))
3736simprd 496 . . . . 5 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
3824a1i 11 . . . . . . 7 (𝜑𝐻 = (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})))
3922elexd 3512 . . . . . . 7 ((𝜑𝑛𝑍) → (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∈ V)
4038, 39fvmpt2d 6773 . . . . . 6 ((𝜑𝑛𝑍) → (𝐻𝑛) = (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
4140ineq1d 4185 . . . . 5 ((𝜑𝑛𝑍) → ((𝐻𝑛) ∩ dom (𝐹𝑛)) = ((𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}) ∩ dom (𝐹𝑛)))
4237, 41eqtr4d 2856 . . . 4 ((𝜑𝑛𝑍) → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
4342ex 413 . . 3 (𝜑 → (𝑛𝑍 → ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
441, 43ralrimi 3213 . 2 (𝜑 → ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
45 smfpimcclem.z . . . . . 6 𝑍𝑉
4645elexi 3511 . . . . 5 𝑍 ∈ V
4746mptex 6977 . . . 4 (𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))})) ∈ V
4824, 47eqeltri 2906 . . 3 𝐻 ∈ V
49 feq1 6488 . . . 4 ( = 𝐻 → (:𝑍𝑆𝐻:𝑍𝑆))
50 nfcv 2974 . . . . . 6 𝑛
51 nfmpt1 5155 . . . . . . 7 𝑛(𝑛𝑍 ↦ (𝐶‘{𝑠𝑆 ∣ ((𝐹𝑛) “ 𝐴) = (𝑠 ∩ dom (𝐹𝑛))}))
5224, 51nfcxfr 2972 . . . . . 6 𝑛𝐻
5350, 52nfeq 2988 . . . . 5 𝑛 = 𝐻
54 fveq1 6662 . . . . . . 7 ( = 𝐻 → (𝑛) = (𝐻𝑛))
5554ineq1d 4185 . . . . . 6 ( = 𝐻 → ((𝑛) ∩ dom (𝐹𝑛)) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))
5655eqeq2d 2829 . . . . 5 ( = 𝐻 → (((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5753, 56ralbid 3228 . . . 4 ( = 𝐻 → (∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛)) ↔ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))))
5849, 57anbi12d 630 . . 3 ( = 𝐻 → ((:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))) ↔ (𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛)))))
5948, 58spcev 3604 . 2 ((𝐻:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝐻𝑛) ∩ dom (𝐹𝑛))) → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
6025, 44, 59syl2anc 584 1 (𝜑 → ∃(:𝑍𝑆 ∧ ∀𝑛𝑍 ((𝐹𝑛) “ 𝐴) = ((𝑛) ∩ dom (𝐹𝑛))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396   = wceq 1528  wex 1771  wnf 1775  wcel 2105  wral 3135  {crab 3139  Vcvv 3492  cin 3932  cmpt 5137  ccnv 5547  dom cdm 5548  ran crn 5549  cima 5551  wf 6344  cfv 6348
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3an 1081  df-tru 1531  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-ral 3140  df-rex 3141  df-reu 3142  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-nul 4289  df-if 4464  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4831  df-iun 4912  df-br 5058  df-opab 5120  df-mpt 5138  df-id 5453  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356
This theorem is referenced by:  smfpimcc  42959
  Copyright terms: Public domain W3C validator