NFE Home New Foundations Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  NFE Home  >  Th. List  >  vfinspss GIF version

Theorem vfinspss 4552
Description: If the universe is finite, then Spfin is a subset of its T raisings and the cardinality of the universe. Theorem X.1.59 of [Rosser] p. 534. (Contributed by SF, 29-Jan-2015.)
Assertion
Ref Expression
vfinspss (V FinSpfin ({a x Spfin a = Tfin x} ∪ { Ncfin V}))
Distinct variable group:   x,a

Proof of Theorem vfinspss
Dummy variables t w z n are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 tfineq 4489 . . . . . . . . . . 11 (x = nTfin x = Tfin n)
21eqeq2d 2364 . . . . . . . . . 10 (x = n → (w = Tfin xw = Tfin n))
32cbvrexv 2837 . . . . . . . . 9 (x Spfin w = Tfin xn Spfin w = Tfin n)
4 vfinspsslem1 4551 . . . . . . . . . . . . 13 (((V Fin Tfin n Spfin ) (n Spfin Sfin (z, Tfin n))) → x Spfin z = Tfin x)
54expr 598 . . . . . . . . . . . 12 (((V Fin Tfin n Spfin ) n Spfin ) → ( Sfin (z, Tfin n) → x Spfin z = Tfin x))
6 eleq1 2413 . . . . . . . . . . . . . . 15 (w = Tfin n → (w SpfinTfin n Spfin ))
76anbi2d 684 . . . . . . . . . . . . . 14 (w = Tfin n → ((V Fin w Spfin ) ↔ (V Fin Tfin n Spfin )))
87anbi1d 685 . . . . . . . . . . . . 13 (w = Tfin n → (((V Fin w Spfin ) n Spfin ) ↔ ((V Fin Tfin n Spfin ) n Spfin )))
9 sfineq2 4528 . . . . . . . . . . . . . 14 (w = Tfin n → ( Sfin (z, w) ↔ Sfin (z, Tfin n)))
109imbi1d 308 . . . . . . . . . . . . 13 (w = Tfin n → (( Sfin (z, w) → x Spfin z = Tfin x) ↔ ( Sfin (z, Tfin n) → x Spfin z = Tfin x)))
118, 10imbi12d 311 . . . . . . . . . . . 12 (w = Tfin n → ((((V Fin w Spfin ) n Spfin ) → ( Sfin (z, w) → x Spfin z = Tfin x)) ↔ (((V Fin Tfin n Spfin ) n Spfin ) → ( Sfin (z, Tfin n) → x Spfin z = Tfin x))))
125, 11mpbiri 224 . . . . . . . . . . 11 (w = Tfin n → (((V Fin w Spfin ) n Spfin ) → ( Sfin (z, w) → x Spfin z = Tfin x)))
1312com12 27 . . . . . . . . . 10 (((V Fin w Spfin ) n Spfin ) → (w = Tfin n → ( Sfin (z, w) → x Spfin z = Tfin x)))
1413rexlimdva 2739 . . . . . . . . 9 ((V Fin w Spfin ) → (n Spfin w = Tfin n → ( Sfin (z, w) → x Spfin z = Tfin x)))
153, 14syl5bi 208 . . . . . . . 8 ((V Fin w Spfin ) → (x Spfin w = Tfin x → ( Sfin (z, w) → x Spfin z = Tfin x)))
16 sfineq2 4528 . . . . . . . . . . . 12 (w = Ncfin V → ( Sfin (z, w) ↔ Sfin (z, Ncfin V)))
1716biimpa 470 . . . . . . . . . . 11 ((w = Ncfin V Sfin (z, w)) → Sfin (z, Ncfin V))
18 1cvsfin 4543 . . . . . . . . . . . 12 (V FinSfin ( Ncfin 1c, Ncfin V))
19 sfin111 4537 . . . . . . . . . . . . 13 (( Sfin ( Ncfin 1c, Ncfin V) Sfin (z, Ncfin V)) → Ncfin 1c = z)
20 tncveqnc1fin 4545 . . . . . . . . . . . . . . . 16 (V FinTfin Ncfin V = Ncfin 1c)
2120eqcomd 2358 . . . . . . . . . . . . . . 15 (V FinNcfin 1c = Tfin Ncfin V)
22 ncvspfin 4539 . . . . . . . . . . . . . . . 16 Ncfin V Spfin
23 tfineq 4489 . . . . . . . . . . . . . . . . . 18 (x = Ncfin V → Tfin x = Tfin Ncfin V)
2423eqeq2d 2364 . . . . . . . . . . . . . . . . 17 (x = Ncfin V → ( Ncfin 1c = Tfin xNcfin 1c = Tfin Ncfin V))
2524rspcev 2956 . . . . . . . . . . . . . . . 16 (( Ncfin V Spfin Ncfin 1c = Tfin Ncfin V) → x Spfin Ncfin 1c = Tfin x)
2622, 25mpan 651 . . . . . . . . . . . . . . 15 ( Ncfin 1c = Tfin Ncfin V → x Spfin Ncfin 1c = Tfin x)
2721, 26syl 15 . . . . . . . . . . . . . 14 (V Finx Spfin Ncfin 1c = Tfin x)
28 eqeq1 2359 . . . . . . . . . . . . . . . . 17 ( Ncfin 1c = z → ( Ncfin 1c = Tfin xz = Tfin x))
2928rexbidv 2636 . . . . . . . . . . . . . . . 16 ( Ncfin 1c = z → (x Spfin Ncfin 1c = Tfin xx Spfin z = Tfin x))
3029biimpd 198 . . . . . . . . . . . . . . 15 ( Ncfin 1c = z → (x Spfin Ncfin 1c = Tfin xx Spfin z = Tfin x))
3130com12 27 . . . . . . . . . . . . . 14 (x Spfin Ncfin 1c = Tfin x → ( Ncfin 1c = zx Spfin z = Tfin x))
3227, 31syl 15 . . . . . . . . . . . . 13 (V Fin → ( Ncfin 1c = zx Spfin z = Tfin x))
3319, 32syl5 28 . . . . . . . . . . . 12 (V Fin → (( Sfin ( Ncfin 1c, Ncfin V) Sfin (z, Ncfin V)) → x Spfin z = Tfin x))
3418, 33mpand 656 . . . . . . . . . . 11 (V Fin → ( Sfin (z, Ncfin V) → x Spfin z = Tfin x))
3517, 34syl5 28 . . . . . . . . . 10 (V Fin → ((w = Ncfin V Sfin (z, w)) → x Spfin z = Tfin x))
3635exp3a 425 . . . . . . . . 9 (V Fin → (w = Ncfin V → ( Sfin (z, w) → x Spfin z = Tfin x)))
3736adantr 451 . . . . . . . 8 ((V Fin w Spfin ) → (w = Ncfin V → ( Sfin (z, w) → x Spfin z = Tfin x)))
3815, 37jaod 369 . . . . . . 7 ((V Fin w Spfin ) → ((x Spfin w = Tfin x w = Ncfin V) → ( Sfin (z, w) → x Spfin z = Tfin x)))
3938imp3a 420 . . . . . 6 ((V Fin w Spfin ) → (((x Spfin w = Tfin x w = Ncfin V) Sfin (z, w)) → x Spfin z = Tfin x))
40 elun 3221 . . . . . . . 8 (w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) ↔ (w {a x Spfin a = Tfin x} w { Ncfin V}))
41 vex 2863 . . . . . . . . . 10 w V
42 eqeq1 2359 . . . . . . . . . . 11 (a = w → (a = Tfin xw = Tfin x))
4342rexbidv 2636 . . . . . . . . . 10 (a = w → (x Spfin a = Tfin xx Spfin w = Tfin x))
4441, 43elab 2986 . . . . . . . . 9 (w {a x Spfin a = Tfin x} ↔ x Spfin w = Tfin x)
4541elsnc 3757 . . . . . . . . 9 (w { Ncfin V} ↔ w = Ncfin V)
4644, 45orbi12i 507 . . . . . . . 8 ((w {a x Spfin a = Tfin x} w { Ncfin V}) ↔ (x Spfin w = Tfin x w = Ncfin V))
4740, 46bitri 240 . . . . . . 7 (w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) ↔ (x Spfin w = Tfin x w = Ncfin V))
4847anbi1i 676 . . . . . 6 ((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) ↔ ((x Spfin w = Tfin x w = Ncfin V) Sfin (z, w)))
49 vex 2863 . . . . . . 7 z V
50 eqeq1 2359 . . . . . . . 8 (a = z → (a = Tfin xz = Tfin x))
5150rexbidv 2636 . . . . . . 7 (a = z → (x Spfin a = Tfin xx Spfin z = Tfin x))
5249, 51elab 2986 . . . . . 6 (z {a x Spfin a = Tfin x} ↔ x Spfin z = Tfin x)
5339, 48, 523imtr4g 261 . . . . 5 ((V Fin w Spfin ) → ((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) → z {a x Spfin a = Tfin x}))
54 ssun1 3427 . . . . . 6 {a x Spfin a = Tfin x} ({a x Spfin a = Tfin x} ∪ { Ncfin V})
5554sseli 3270 . . . . 5 (z {a x Spfin a = Tfin x} → z ({a x Spfin a = Tfin x} ∪ { Ncfin V}))
5653, 55syl6 29 . . . 4 ((V Fin w Spfin ) → ((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) → z ({a x Spfin a = Tfin x} ∪ { Ncfin V})))
5756alrimiv 1631 . . 3 ((V Fin w Spfin ) → z((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) → z ({a x Spfin a = Tfin x} ∪ { Ncfin V})))
5857ralrimiva 2698 . 2 (V Finw Spfin z((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) → z ({a x Spfin a = Tfin x} ∪ { Ncfin V})))
59 vex 2863 . . . . . . . . 9 a V
6059elimak 4260 . . . . . . . 8 (a ((({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) “k 1 Spfin ) ↔ t 1 Spfint, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))))
61 df-rex 2621 . . . . . . . . 9 (t 1 Spfint, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) ↔ t(t 1 Spfin t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
62 elpw1 4145 . . . . . . . . . . . . 13 (t 1 Spfinx Spfin t = {x})
6362anbi1i 676 . . . . . . . . . . . 12 ((t 1 Spfin t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ (x Spfin t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
64 r19.41v 2765 . . . . . . . . . . . 12 (x Spfin (t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ (x Spfin t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
6563, 64bitr4i 243 . . . . . . . . . . 11 ((t 1 Spfin t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ x Spfin (t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
6665exbii 1582 . . . . . . . . . 10 (t(t 1 Spfin t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ tx Spfin (t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
67 rexcom4 2879 . . . . . . . . . 10 (x Spfin t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ tx Spfin (t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
6866, 67bitr4i 243 . . . . . . . . 9 (t(t 1 Spfin t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ x Spfin t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
6961, 68bitri 240 . . . . . . . 8 (t 1 Spfint, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) ↔ x Spfin t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
7060, 69bitri 240 . . . . . . 7 (a ((({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) “k 1 Spfin ) ↔ x Spfin t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
71 snex 4112 . . . . . . . . . 10 {x} V
72 opkeq1 4060 . . . . . . . . . . 11 (t = {x} → ⟪t, a⟫ = ⟪{x}, a⟫)
7372eleq1d 2419 . . . . . . . . . 10 (t = {x} → (⟪t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) ↔ ⟪{x}, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))))
7471, 73ceqsexv 2895 . . . . . . . . 9 (t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ ⟪{x}, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))))
75 vex 2863 . . . . . . . . . 10 x V
7675, 59eqtfinrelk 4487 . . . . . . . . 9 (⟪{x}, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) ↔ a = Tfin x)
7774, 76bitri 240 . . . . . . . 8 (t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ a = Tfin x)
7877rexbii 2640 . . . . . . 7 (x Spfin t(t = {x} t, a (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V)))) ↔ x Spfin a = Tfin x)
7970, 78bitri 240 . . . . . 6 (a ((({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) “k 1 Spfin ) ↔ x Spfin a = Tfin x)
8079abbi2i 2465 . . . . 5 ((({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) “k 1 Spfin ) = {a x Spfin a = Tfin x}
81 tfinrelkex 4488 . . . . . 6 (({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) V
82 spfinex 4538 . . . . . . 7 Spfin V
8382pw1ex 4304 . . . . . 6 1 Spfin V
8481, 83imakex 4301 . . . . 5 ((({{}} ×k {}) ∪ ( ∼ (( Ins2k SkIns3k (( Ins3k k Sk Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk SkIns3k (( Ins3k SIk ((1c ×k V) (( Ins3k SkIns2k SIk Sk ) “k 1111c)) ∩ Ins2k Sk ) “k 111c)) “k 1111c)) ⊕ Ins3k Ik ) “k 11c)) “k 11c)) “k 111c) ({{}} ×k V))) “k 1 Spfin ) V
8580, 84eqeltrri 2424 . . . 4 {a x Spfin a = Tfin x} V
86 snex 4112 . . . 4 { Ncfin V} V
8785, 86unex 4107 . . 3 ({a x Spfin a = Tfin x} ∪ { Ncfin V}) V
88 ssun2 3428 . . . 4 { Ncfin V} ({a x Spfin a = Tfin x} ∪ { Ncfin V})
89 ncfinex 4473 . . . . 5 Ncfin V V
9089snid 3761 . . . 4 Ncfin V { Ncfin V}
9188, 90sselii 3271 . . 3 Ncfin V ({a x Spfin a = Tfin x} ∪ { Ncfin V})
92 spfininduct 4541 . . 3 ((({a x Spfin a = Tfin x} ∪ { Ncfin V}) V Ncfin V ({a x Spfin a = Tfin x} ∪ { Ncfin V}) w Spfin z((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) → z ({a x Spfin a = Tfin x} ∪ { Ncfin V}))) → Spfin ({a x Spfin a = Tfin x} ∪ { Ncfin V}))
9387, 91, 92mp3an12 1267 . 2 (w Spfin z((w ({a x Spfin a = Tfin x} ∪ { Ncfin V}) Sfin (z, w)) → z ({a x Spfin a = Tfin x} ∪ { Ncfin V})) → Spfin ({a x Spfin a = Tfin x} ∪ { Ncfin V}))
9458, 93syl 15 1 (V FinSpfin ({a x Spfin a = Tfin x} ∪ { Ncfin V}))
Colors of variables: wff setvar class
Syntax hints:  wi 4   wo 357   wa 358  wal 1540  wex 1541   = wceq 1642   wcel 1710  {cab 2339  wral 2615  wrex 2616  Vcvv 2860  ccompl 3206   cdif 3207  cun 3208  cin 3209  csymdif 3210   wss 3258  c0 3551  cpw 3723  {csn 3738  copk 4058  1cc1c 4135  1cpw1 4136   ×k cxpk 4175  kccnvk 4176   Ins2k cins2k 4177   Ins3k cins3k 4178  k cimak 4180   SIk csik 4182   Sk cssetk 4184   Ik cidk 4185   Nn cnnc 4374   Fin cfin 4377   Ncfin cncfin 4435   Tfin ctfin 4436   Sfin wsfin 4439   Spfin cspfin 4440
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1546  ax-5 1557  ax-17 1616  ax-9 1654  ax-8 1675  ax-13 1712  ax-14 1714  ax-6 1729  ax-7 1734  ax-11 1746  ax-12 1925  ax-ext 2334  ax-nin 4079  ax-xp 4080  ax-cnv 4081  ax-1c 4082  ax-sset 4083  ax-si 4084  ax-ins2 4085  ax-ins3 4086  ax-typlower 4087  ax-sn 4088
This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3or 935  df-3an 936  df-nan 1288  df-tru 1319  df-ex 1542  df-nf 1545  df-sb 1649  df-eu 2208  df-mo 2209  df-clab 2340  df-cleq 2346  df-clel 2349  df-nfc 2479  df-ne 2519  df-ral 2620  df-rex 2621  df-reu 2622  df-rmo 2623  df-rab 2624  df-v 2862  df-sbc 3048  df-nin 3212  df-compl 3213  df-in 3214  df-un 3215  df-dif 3216  df-symdif 3217  df-ss 3260  df-pss 3262  df-nul 3552  df-if 3664  df-pw 3725  df-sn 3742  df-pr 3743  df-uni 3893  df-int 3928  df-opk 4059  df-1c 4137  df-pw1 4138  df-uni1 4139  df-xpk 4186  df-cnvk 4187  df-ins2k 4188  df-ins3k 4189  df-imak 4190  df-cok 4191  df-p6 4192  df-sik 4193  df-ssetk 4194  df-imagek 4195  df-idk 4196  df-iota 4340  df-0c 4378  df-addc 4379  df-nnc 4380  df-fin 4381  df-lefin 4441  df-ltfin 4442  df-ncfin 4443  df-tfin 4444  df-sfin 4447  df-spfin 4448
This theorem is referenced by:  vfinspeqtncv  4554
  Copyright terms: Public domain W3C validator