Step | Hyp | Ref
| Expression |
1 | | tncveqnc1fin 4545 |
. . . . . 6
⊢ (V ∈ Fin → Tfin Ncfin V = Ncfin 1c) |
2 | | 1cspfin 4544 |
. . . . . 6
⊢ (V ∈ Fin → Ncfin 1c ∈ Spfin
) |
3 | 1, 2 | eqeltrd 2427 |
. . . . 5
⊢ (V ∈ Fin → Tfin Ncfin V ∈
Spfin ) |
4 | | ncfinex 4473 |
. . . . . 6
⊢ Ncfin V ∈
V |
5 | | tfineq 4489 |
. . . . . . 7
⊢ (x = Ncfin V
→ Tfin x = Tfin
Ncfin V) |
6 | 5 | eleq1d 2419 |
. . . . . 6
⊢ (x = Ncfin V
→ ( Tfin x ∈ Spfin ↔ Tfin Ncfin V ∈
Spfin )) |
7 | 4, 6 | elab 2986 |
. . . . 5
⊢ ( Ncfin V ∈
{x ∣
Tfin x ∈ Spfin } ↔ Tfin Ncfin V ∈
Spfin ) |
8 | 3, 7 | sylibr 203 |
. . . 4
⊢ (V ∈ Fin → Ncfin V ∈
{x ∣
Tfin x ∈ Spfin }) |
9 | | simprl 732 |
. . . . . . . . 9
⊢ (((V ∈ Fin ∧ y ∈ Spfin )
∧ ( Tfin y
∈ Spfin ∧
Sfin (z, y))) →
Tfin y ∈ Spfin ) |
10 | | sfintfin 4533 |
. . . . . . . . . 10
⊢ ( Sfin (z,
y) → Sfin ( Tfin z,
Tfin y)) |
11 | 10 | ad2antll 709 |
. . . . . . . . 9
⊢ (((V ∈ Fin ∧ y ∈ Spfin )
∧ ( Tfin y
∈ Spfin ∧
Sfin (z, y))) →
Sfin ( Tfin z,
Tfin y)) |
12 | | spfinsfincl 4540 |
. . . . . . . . 9
⊢ (( Tfin y
∈ Spfin ∧
Sfin ( Tfin z,
Tfin y)) → Tfin z
∈ Spfin ) |
13 | 9, 11, 12 | syl2anc 642 |
. . . . . . . 8
⊢ (((V ∈ Fin ∧ y ∈ Spfin )
∧ ( Tfin y
∈ Spfin ∧
Sfin (z, y))) →
Tfin z ∈ Spfin ) |
14 | 13 | ex 423 |
. . . . . . 7
⊢ ((V ∈ Fin ∧ y ∈ Spfin )
→ (( Tfin y ∈ Spfin ∧
Sfin (z, y)) →
Tfin z ∈ Spfin )) |
15 | | vex 2863 |
. . . . . . . . 9
⊢ y ∈
V |
16 | | tfineq 4489 |
. . . . . . . . . 10
⊢ (x = y →
Tfin x = Tfin
y) |
17 | 16 | eleq1d 2419 |
. . . . . . . . 9
⊢ (x = y → (
Tfin x ∈ Spfin ↔ Tfin y
∈ Spfin )) |
18 | 15, 17 | elab 2986 |
. . . . . . . 8
⊢ (y ∈ {x ∣ Tfin x
∈ Spfin } ↔ Tfin y
∈ Spfin ) |
19 | 18 | anbi1i 676 |
. . . . . . 7
⊢ ((y ∈ {x ∣ Tfin x
∈ Spfin } ∧
Sfin (z, y)) ↔ (
Tfin y ∈ Spfin ∧
Sfin (z, y))) |
20 | | vex 2863 |
. . . . . . . 8
⊢ z ∈
V |
21 | | tfineq 4489 |
. . . . . . . . 9
⊢ (x = z →
Tfin x = Tfin
z) |
22 | 21 | eleq1d 2419 |
. . . . . . . 8
⊢ (x = z → (
Tfin x ∈ Spfin ↔ Tfin z
∈ Spfin )) |
23 | 20, 22 | elab 2986 |
. . . . . . 7
⊢ (z ∈ {x ∣ Tfin x
∈ Spfin } ↔ Tfin z
∈ Spfin ) |
24 | 14, 19, 23 | 3imtr4g 261 |
. . . . . 6
⊢ ((V ∈ Fin ∧ y ∈ Spfin )
→ ((y ∈ {x ∣ Tfin
x ∈ Spfin } ∧
Sfin (z, y)) →
z ∈
{x ∣
Tfin x ∈ Spfin })) |
25 | 24 | alrimiv 1631 |
. . . . 5
⊢ ((V ∈ Fin ∧ y ∈ Spfin )
→ ∀z((y ∈ {x ∣ Tfin
x ∈ Spfin } ∧
Sfin (z, y)) →
z ∈
{x ∣
Tfin x ∈ Spfin })) |
26 | 25 | ralrimiva 2698 |
. . . 4
⊢ (V ∈ Fin → ∀y ∈ Spfin
∀z((y ∈ {x ∣ Tfin
x ∈ Spfin } ∧
Sfin (z, y)) →
z ∈
{x ∣
Tfin x ∈ Spfin })) |
27 | | snex 4112 |
. . . . . . . . . 10
⊢ {x} ∈
V |
28 | 27 | elimak 4260 |
. . . . . . . . 9
⊢ ({x} ∈ (◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) ↔ ∃y ∈ Spfin
⟪y, {x}⟫ ∈ ◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V)))) |
29 | 15, 27 | opkelcnvk 4251 |
. . . . . . . . . . 11
⊢ (⟪y, {x}⟫
∈ ◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) ↔ ⟪{x}, y⟫
∈ (({{∅}}
×k {∅}) ∪ (
∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V)))) |
30 | | vex 2863 |
. . . . . . . . . . . 12
⊢ x ∈
V |
31 | 30, 15 | eqtfinrelk 4487 |
. . . . . . . . . . 11
⊢ (⟪{x}, y⟫
∈ (({{∅}}
×k {∅}) ∪ (
∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) ↔ y =
Tfin x) |
32 | 29, 31 | bitri 240 |
. . . . . . . . . 10
⊢ (⟪y, {x}⟫
∈ ◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) ↔ y =
Tfin x) |
33 | 32 | rexbii 2640 |
. . . . . . . . 9
⊢ (∃y ∈ Spfin
⟪y, {x}⟫ ∈ ◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) ↔ ∃y ∈ Spfin
y = Tfin x) |
34 | 28, 33 | bitri 240 |
. . . . . . . 8
⊢ ({x} ∈ (◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) ↔ ∃y ∈ Spfin
y = Tfin x) |
35 | 30 | eluni1 4174 |
. . . . . . . 8
⊢ (x ∈
⋃1(◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) ↔ {x} ∈ (◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin )) |
36 | | risset 2662 |
. . . . . . . 8
⊢ ( Tfin x
∈ Spfin ↔ ∃y ∈ Spfin
y = Tfin x) |
37 | 34, 35, 36 | 3bitr4i 268 |
. . . . . . 7
⊢ (x ∈
⋃1(◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) ↔ Tfin x
∈ Spfin ) |
38 | 37 | abbi2i 2465 |
. . . . . 6
⊢
⋃1(◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) = {x ∣ Tfin x
∈ Spfin } |
39 | | tfinrelkex 4488 |
. . . . . . . . 9
⊢ (({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) ∈
V |
40 | 39 | cnvkex 4288 |
. . . . . . . 8
⊢ ◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) ∈
V |
41 | | spfinex 4538 |
. . . . . . . 8
⊢ Spfin ∈
V |
42 | 40, 41 | imakex 4301 |
. . . . . . 7
⊢ (◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) ∈
V |
43 | 42 | uni1ex 4294 |
. . . . . 6
⊢
⋃1(◡k(({{∅}} ×k {∅}) ∪ ( ∼ (( Ins2k Sk ⊕ Ins3k (( Ins3k ◡k Sk ∖ Ins2k (( Ins2k (( Nn ×k V) ∩ (( Ins2k SIk Sk ∩ Ins3k (( Ins3k SIk ((℘1c ×k
V) ∖ (( Ins3k Sk ⊕ Ins2k SIk Sk ) “k ℘1℘1℘11c)) ∩ Ins2k Sk ) “k ℘1℘11c))
“k ℘1℘1℘11c)) ⊕
Ins3k Ik )
“k ℘11c))
“k ℘11c))
“k ℘1℘11c) ∖ ({{∅}}
×k V))) “k Spfin ) ∈
V |
44 | 38, 43 | eqeltrri 2424 |
. . . . 5
⊢ {x ∣ Tfin x
∈ Spfin } ∈
V |
45 | | spfininduct 4541 |
. . . . 5
⊢ (({x ∣ Tfin x
∈ Spfin } ∈ V
∧ Ncfin V ∈
{x ∣
Tfin x ∈ Spfin } ∧
∀y
∈ Spfin ∀z((y ∈ {x ∣ Tfin x
∈ Spfin } ∧
Sfin (z, y)) →
z ∈
{x ∣
Tfin x ∈ Spfin })) → Spfin ⊆
{x ∣
Tfin x ∈ Spfin }) |
46 | 44, 45 | mp3an1 1264 |
. . . 4
⊢ (( Ncfin V ∈
{x ∣
Tfin x ∈ Spfin } ∧
∀y
∈ Spfin ∀z((y ∈ {x ∣ Tfin x
∈ Spfin } ∧
Sfin (z, y)) →
z ∈
{x ∣
Tfin x ∈ Spfin })) → Spfin ⊆
{x ∣
Tfin x ∈ Spfin }) |
47 | 8, 26, 46 | syl2anc 642 |
. . 3
⊢ (V ∈ Fin → Spfin ⊆
{x ∣
Tfin x ∈ Spfin }) |
48 | 47 | sselda 3274 |
. 2
⊢ ((V ∈ Fin ∧ X ∈ Spfin )
→ X ∈ {x ∣ Tfin
x ∈ Spfin }) |
49 | | tfineq 4489 |
. . . . 5
⊢ (x = X →
Tfin x = Tfin
X) |
50 | 49 | eleq1d 2419 |
. . . 4
⊢ (x = X → (
Tfin x ∈ Spfin ↔ Tfin X
∈ Spfin )) |
51 | 50 | elabg 2987 |
. . 3
⊢ (X ∈ Spfin → (X ∈ {x ∣ Tfin x
∈ Spfin } ↔ Tfin X
∈ Spfin )) |
52 | 51 | adantl 452 |
. 2
⊢ ((V ∈ Fin ∧ X ∈ Spfin )
→ (X ∈ {x ∣ Tfin
x ∈ Spfin } ↔ Tfin X
∈ Spfin )) |
53 | 48, 52 | mpbid 201 |
1
⊢ ((V ∈ Fin ∧ X ∈ Spfin )
→ Tfin X ∈ Spfin ) |