Proof of Theorem sspval
| Step | Hyp | Ref
| Expression |
| 1 | | fveq2 3730 |
. . . . . . 7
⊢ (u = U → (
+v ‘u) = (
+v ‘U)) |
| 2 | | sspval.g |
. . . . . . 7
⊢ G = ( +v ‘U) |
| 3 | 1, 2 | syl6eqr 1528 |
. . . . . 6
⊢ (u = U → (
+v ‘u) = G) |
| 4 | 3 | sseq2d 2092 |
. . . . 5
⊢ (u = U → ((
+v ‘w) ⊆ ( +v ‘u) ↔ ( +v ‘w) ⊆ G)) |
| 5 | | fveq2 3730 |
. . . . . . 7
⊢ (u = U → (
·s ‘u) = ( ·s
‘U)) |
| 6 | | sspval.s |
. . . . . . 7
⊢ S = ( ·s
‘U) |
| 7 | 5, 6 | syl6eqr 1528 |
. . . . . 6
⊢ (u = U → (
·s ‘u) = S) |
| 8 | 7 | sseq2d 2092 |
. . . . 5
⊢ (u = U → ((
·s ‘w) ⊆ (
·s ‘u) ↔ ( ·s
‘w) ⊆ S)) |
| 9 | | fveq2 3730 |
. . . . . . 7
⊢ (u = U →
(norm ‘u) = (norm ‘U)) |
| 10 | | sspval.n |
. . . . . . 7
⊢ N = (norm ‘U) |
| 11 | 9, 10 | syl6eqr 1528 |
. . . . . 6
⊢ (u = U →
(norm ‘u) = N) |
| 12 | 11 | sseq2d 2092 |
. . . . 5
⊢ (u = U →
((norm ‘w) ⊆ (norm ‘u) ↔ (norm ‘w) ⊆ N)) |
| 13 | 4, 8, 12 | 3anbi123d 895 |
. . . 4
⊢ (u = U → (((
+v ‘w) ⊆ ( +v ‘u) ⋀ (
·s ‘w) ⊆ (
·s ‘u) ⋀ (norm
‘w) ⊆ (norm ‘u)) ↔ (( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N))) |
| 14 | 13 | rabbisdv 1810 |
. . 3
⊢ (u = U →
{w ∈
NrmCVec∣(( +v
‘w) ⊆ ( +v ‘u) ⋀ (
·s ‘w) ⊆ (
·s ‘u) ⋀ (norm
‘w) ⊆ (norm ‘u))} = {w ∈ NrmCVec∣((
+v ‘w) ⊆ G ⋀ ( ·s
‘w) ⊆ S ⋀ (norm ‘w) ⊆ N)}) |
| 15 | | df-ssp 8377 |
. . 3
⊢ SubSp = {〈u, s〉∣(u ∈ NrmCVec ⋀
s = {w
∈ NrmCVec∣(( +v ‘w) ⊆ (
+v ‘u) ⋀ ( ·s
‘w) ⊆ ( ·s
‘u) ⋀ (norm ‘w) ⊆ (norm
‘u))})} |
| 16 | | fvex 3738 |
. . . . . . . 8
⊢ ( +v
‘U) ∈ V |
| 17 | 2, 16 | eqeltr 1547 |
. . . . . . 7
⊢ G ∈
V |
| 18 | 17 | pwex 2751 |
. . . . . 6
⊢ ℘G ∈ V |
| 19 | | fvex 3738 |
. . . . . . . 8
⊢ (
·s ‘U) ∈
V |
| 20 | 6, 19 | eqeltr 1547 |
. . . . . . 7
⊢ S ∈
V |
| 21 | 20 | pwex 2751 |
. . . . . 6
⊢ ℘S ∈ V |
| 22 | 18, 21 | xpex 3266 |
. . . . 5
⊢ (℘G ×
℘S)
∈ V |
| 23 | | fvex 3738 |
. . . . . . 7
⊢ (norm ‘U) ∈
V |
| 24 | 10, 23 | eqeltr 1547 |
. . . . . 6
⊢ N ∈
V |
| 25 | 24 | pwex 2751 |
. . . . 5
⊢ ℘N ∈ V |
| 26 | 22, 25 | xpex 3266 |
. . . 4
⊢ ((℘G ×
℘S)
× ℘N) ∈
V |
| 27 | | eqid 1478 |
. . . . . . . . 9
⊢ (1st
‘u) = (1st ‘u) |
| 28 | | eqid 1478 |
. . . . . . . . . . 11
⊢ (norm ‘u) = (norm ‘u) |
| 29 | 28 | nmfval 8222 |
. . . . . . . . . 10
⊢ (norm ‘u) = (2nd ‘u) |
| 30 | 29 | eqcomi 1482 |
. . . . . . . . 9
⊢ (2nd
‘u) = (norm ‘u) |
| 31 | 27, 30 | nvop2 8223 |
. . . . . . . 8
⊢ (u ∈ NrmCVec →
u = 〈(1st ‘u), (2nd ‘u)〉) |
| 32 | 31 | adantr 391 |
. . . . . . 7
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → u =
〈(1st ‘u), (2nd ‘u)〉) |
| 33 | | eqid 1478 |
. . . . . . . . . . . . 13
⊢ ( +v
‘u) = ( +v
‘u) |
| 34 | 33 | vafval 8218 |
. . . . . . . . . . . 12
⊢ ( +v
‘u) = (1st
‘(1st ‘u)) |
| 35 | 34 | eqcomi 1482 |
. . . . . . . . . . 11
⊢ (1st
‘(1st ‘u)) = (
+v ‘u) |
| 36 | | eqid 1478 |
. . . . . . . . . . . . 13
⊢ (
·s ‘u) = ( ·s
‘u) |
| 37 | 36 | smfval 8220 |
. . . . . . . . . . . 12
⊢ (
·s ‘u) = (2nd ‘(1st
‘u)) |
| 38 | 37 | eqcomi 1482 |
. . . . . . . . . . 11
⊢ (2nd
‘(1st ‘u)) = (
·s ‘u) |
| 39 | 27, 35, 38 | nvvop 8224 |
. . . . . . . . . 10
⊢ (u ∈ NrmCVec →
(1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉) |
| 40 | 39 | adantr 391 |
. . . . . . . . 9
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → (1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉) |
| 41 | 34 | eleq1i 1540 |
. . . . . . . . . . . . 13
⊢ (( +v
‘u) ∈ ℘G ↔ (1st ‘(1st
‘u)) ∈ ℘G) |
| 42 | 41 | biimp 151 |
. . . . . . . . . . . 12
⊢ (( +v
‘u) ∈ ℘G → (1st ‘(1st
‘u)) ∈ ℘G) |
| 43 | 42 | ad2antrr 406 |
. . . . . . . . . . 11
⊢ (((( +v
‘u) ∈ ℘G ⋀ (
·s ‘u) ∈ ℘S) ⋀ (norm ‘u) ∈ ℘N) →
(1st ‘(1st ‘u)) ∈ ℘G) |
| 44 | 43 | adantl 390 |
. . . . . . . . . 10
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → (1st ‘(1st
‘u)) ∈ ℘G) |
| 45 | 37 | eleq1i 1540 |
. . . . . . . . . . . . 13
⊢ ((
·s ‘u) ∈ ℘S ↔
(2nd ‘(1st ‘u)) ∈ ℘S) |
| 46 | 45 | biimp 151 |
. . . . . . . . . . . 12
⊢ ((
·s ‘u) ∈ ℘S →
(2nd ‘(1st ‘u)) ∈ ℘S) |
| 47 | 46 | ad2antlr 407 |
. . . . . . . . . . 11
⊢ (((( +v
‘u) ∈ ℘G ⋀ (
·s ‘u) ∈ ℘S) ⋀ (norm ‘u) ∈ ℘N) →
(2nd ‘(1st ‘u)) ∈ ℘S) |
| 48 | 47 | adantl 390 |
. . . . . . . . . 10
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → (2nd ‘(1st
‘u)) ∈ ℘S) |
| 49 | 44, 48 | jca 288 |
. . . . . . . . 9
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → ((1st ‘(1st
‘u)) ∈ ℘G ⋀
(2nd ‘(1st ‘u)) ∈ ℘S)) |
| 50 | 40, 49 | jca 288 |
. . . . . . . 8
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → ((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S))) |
| 51 | 29 | eleq1i 1540 |
. . . . . . . . . 10
⊢ ((norm ‘u) ∈ ℘N ↔
(2nd ‘u) ∈ ℘N) |
| 52 | 51 | biimp 151 |
. . . . . . . . 9
⊢ ((norm ‘u) ∈ ℘N →
(2nd ‘u) ∈ ℘N) |
| 53 | 52 | ad2antll 409 |
. . . . . . . 8
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → (2nd ‘u) ∈ ℘N) |
| 54 | 50, 53 | jca 288 |
. . . . . . 7
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → (((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S)) ⋀
(2nd ‘u) ∈ ℘N)) |
| 55 | 32, 54 | jca 288 |
. . . . . 6
⊢ ((u ∈ NrmCVec ⋀ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) → (u =
〈(1st ‘u), (2nd ‘u)〉 ⋀ (((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S)) ⋀
(2nd ‘u) ∈ ℘N))) |
| 56 | | fveq2 3730 |
. . . . . . . . . 10
⊢ (w = u → (
+v ‘w) = (
+v ‘u)) |
| 57 | 56 | sseq1d 2091 |
. . . . . . . . 9
⊢ (w = u → ((
+v ‘w) ⊆ G ↔ (
+v ‘u) ⊆ G)) |
| 58 | | fveq2 3730 |
. . . . . . . . . 10
⊢ (w = u → (
·s ‘w) = ( ·s
‘u)) |
| 59 | 58 | sseq1d 2091 |
. . . . . . . . 9
⊢ (w = u → ((
·s ‘w) ⊆ S ↔ ( ·s
‘u) ⊆ S)) |
| 60 | | fveq2 3730 |
. . . . . . . . . 10
⊢ (w = u →
(norm ‘w) = (norm ‘u)) |
| 61 | 60 | sseq1d 2091 |
. . . . . . . . 9
⊢ (w = u →
((norm ‘w) ⊆ N ↔
(norm ‘u) ⊆ N)) |
| 62 | 57, 59, 61 | 3anbi123d 895 |
. . . . . . . 8
⊢ (w = u → (((
+v ‘w) ⊆ G ⋀ ( ·s
‘w) ⊆ S ⋀ (norm ‘w) ⊆ N) ↔ (( +v ‘u) ⊆ G ⋀ (
·s ‘u) ⊆ S ⋀ (norm
‘u) ⊆ N))) |
| 63 | | fvex 3738 |
. . . . . . . . . . 11
⊢ ( +v
‘u) ∈ V |
| 64 | 63 | elpw 2408 |
. . . . . . . . . 10
⊢ (( +v
‘u) ∈ ℘G ↔ ( +v ‘u) ⊆ G) |
| 65 | | fvex 3738 |
. . . . . . . . . . 11
⊢ (
·s ‘u) ∈
V |
| 66 | 65 | elpw 2408 |
. . . . . . . . . 10
⊢ ((
·s ‘u) ∈ ℘S ↔ (
·s ‘u) ⊆ S) |
| 67 | | fvex 3738 |
. . . . . . . . . . 11
⊢ (norm ‘u) ∈
V |
| 68 | 67 | elpw 2408 |
. . . . . . . . . 10
⊢ ((norm ‘u) ∈ ℘N ↔
(norm ‘u) ⊆ N) |
| 69 | 64, 66, 68 | 3anbi123i 824 |
. . . . . . . . 9
⊢ ((( +v
‘u) ∈ ℘G ⋀ (
·s ‘u) ∈ ℘S ⋀ (norm ‘u) ∈ ℘N) ↔ ((
+v ‘u) ⊆ G ⋀ ( ·s
‘u) ⊆ S ⋀ (norm ‘u) ⊆ N)) |
| 70 | | df-3an 779 |
. . . . . . . . 9
⊢ ((( +v
‘u) ∈ ℘G ⋀ (
·s ‘u) ∈ ℘S ⋀ (norm ‘u) ∈ ℘N) ↔
((( +v ‘u) ∈ ℘G ⋀ (
·s ‘u) ∈ ℘S) ⋀ (norm ‘u) ∈ ℘N)) |
| 71 | 69, 70 | bitr3 175 |
. . . . . . . 8
⊢ ((( +v
‘u) ⊆ G ⋀ ( ·s
‘u) ⊆ S ⋀ (norm ‘u) ⊆ N) ↔ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N)) |
| 72 | 62, 71 | syl6bb 538 |
. . . . . . 7
⊢ (w = u → (((
+v ‘w) ⊆ G ⋀ ( ·s
‘w) ⊆ S ⋀ (norm ‘w) ⊆ N) ↔ ((( +v ‘u) ∈ ℘G ⋀ ( ·s
‘u) ∈ ℘S) ⋀ (norm
‘u) ∈ ℘N))) |
| 73 | 72 | elrab 1908 |
. . . . . 6
⊢ (u ∈ {w ∈ NrmCVec∣(( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N)} ↔
(u ∈
NrmCVec ⋀ ((( +v
‘u) ∈ ℘G ⋀ (
·s ‘u) ∈ ℘S) ⋀ (norm ‘u) ∈ ℘N))) |
| 74 | | elxp6 4108 |
. . . . . . 7
⊢ (u ∈ ((℘G ×
℘S)
× ℘N) ↔ (u =
〈(1st ‘u), (2nd ‘u)〉 ⋀ ((1st ‘u) ∈ (℘G ×
℘S)
⋀ (2nd ‘u) ∈ ℘N))) |
| 75 | | elxp6 4108 |
. . . . . . . . 9
⊢ ((1st
‘u) ∈ (℘G × ℘S) ↔
((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S))) |
| 76 | 75 | anbi1i 483 |
. . . . . . . 8
⊢ (((1st
‘u) ∈ (℘G × ℘S) ⋀ (2nd ‘u) ∈ ℘N) ↔
(((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S)) ⋀
(2nd ‘u) ∈ ℘N)) |
| 77 | 76 | anbi2i 482 |
. . . . . . 7
⊢ ((u = 〈(1st ‘u), (2nd ‘u)〉 ⋀ ((1st ‘u) ∈ (℘G ×
℘S)
⋀ (2nd ‘u) ∈ ℘N)) ↔
(u = 〈(1st ‘u), (2nd ‘u)〉 ⋀ (((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S)) ⋀
(2nd ‘u) ∈ ℘N))) |
| 78 | 74, 77 | bitr 173 |
. . . . . 6
⊢ (u ∈ ((℘G ×
℘S)
× ℘N) ↔ (u =
〈(1st ‘u), (2nd ‘u)〉 ⋀ (((1st ‘u) = 〈(1st ‘(1st
‘u)), (2nd
‘(1st ‘u))〉 ⋀
((1st ‘(1st ‘u)) ∈ ℘G ⋀ (2nd ‘(1st
‘u)) ∈ ℘S)) ⋀
(2nd ‘u) ∈ ℘N))) |
| 79 | 55, 73, 78 | 3imtr4 219 |
. . . . 5
⊢ (u ∈ {w ∈ NrmCVec∣(( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N)} →
u ∈
((℘G
× ℘S) × ℘N)) |
| 80 | 79 | ssriv 2072 |
. . . 4
⊢ {w ∈ NrmCVec∣(( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N)} ⊆ ((℘G × ℘S) ×
℘N) |
| 81 | 26, 80 | ssexi 2725 |
. . 3
⊢ {w ∈ NrmCVec∣(( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N)} ∈ V |
| 82 | 14, 15, 81 | fvopab4 3786 |
. 2
⊢ (U ∈ NrmCVec →
(SubSp ‘U) = {w ∈ NrmCVec∣(( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N)}) |
| 83 | | sspval.h |
. 2
⊢ H = (SubSp ‘U) |
| 84 | 82, 83 | syl5eq 1522 |
1
⊢ (U ∈ NrmCVec →
H = {w
∈ NrmCVec∣(( +v ‘w) ⊆ G ⋀ (
·s ‘w) ⊆ S ⋀ (norm
‘w) ⊆ N)}) |