HomeHome Hilbert Space Explorer < Previous   Next >
Related theorems
Unicode version

Theorem hlimunii 9029
Description: A Hilbert space sequence converges to at most one limit.
Hypotheses
Ref Expression
hlimuni.1 |- A e. V
hlimuni.2 |- B e. V
hlimuni.3 |- F e. V
hlimunii.3 |- (F ~~>v A /\ F ~~>v B)
Assertion
Ref Expression
hlimunii |- A = B

Proof of Theorem hlimunii
StepHypRef Expression
1 nn2get 5890 . . . . 5 |- ((y e. NN /\ w e. NN) -> E.z e. NN (y <_ z /\ w <_ z))
21rgen2a 1691 . . . 4 |- A.y e. NN A.w e. NN E.z e. NN (y <_ z /\ w <_ z)
3 hlimunii.3 . . . . . . . . . 10 |- (F ~~>v A /\ F ~~>v B)
43pm3.26i 320 . . . . . . . . 9 |- F ~~>v A
5 hlimuni.3 . . . . . . . . . 10 |- F e. V
6 hlimuni.1 . . . . . . . . . 10 |- A e. V
75, 6hlimvec 8979 . . . . . . . . 9 |- (F ~~>v A -> A e. H~)
84, 7ax-mp 7 . . . . . . . 8 |- A e. H~
93pm3.27i 324 . . . . . . . . 9 |- F ~~>v B
10 hlimuni.2 . . . . . . . . . 10 |- B e. V
115, 10hlimvec 8979 . . . . . . . . 9 |- (F ~~>v B -> B e. H~)
129, 11ax-mp 7 . . . . . . . 8 |- B e. H~
138, 12hvsubcl 8812 . . . . . . 7 |- (A -h B) e. H~
1413normcl 8919 . . . . . 6 |- (normh` (A -h B)) e. RR
15 2re 5926 . . . . . 6 |- 2 e. RR
16 2pos 5936 . . . . . 6 |- 0 < 2
1714, 15, 16divgt0i2 5813 . . . . 5 |- (0 < (normh` (A -h B)) -> 0 < ((normh` (A -h B)) / 2))
18 2ne0 5937 . . . . . . . 8 |- 2 =/= 0
1914, 15, 18redivcl 5754 . . . . . . 7 |- ((normh` (A -h B)) / 2) e. RR
205, 6hlimconv 8980 . . . . . . . 8 |- (F ~~>v A -> A.x e. RR (0 < x -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < x)))
214, 20ax-mp 7 . . . . . . 7 |- A.x e. RR (0 < x -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < x))
22 breq2 2613 . . . . . . . . 9 |- (x = ((normh` (A -h B)) / 2) -> (0 < x <-> 0 < ((normh` (A -h B)) / 2)))
23 breq2 2613 . . . . . . . . . . 11 |- (x = ((normh` (A -h B)) / 2) -> ((normh` ((F` z) -h A)) < x <-> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)))
2423imbi2d 610 . . . . . . . . . 10 |- (x = ((normh` (A -h B)) / 2) -> ((y <_ z -> (normh` ((F` z) -h A)) < x) <-> (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2))))
2524rexralbidv 1674 . . . . . . . . 9 |- (x = ((normh` (A -h B)) / 2) -> (E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < x) <-> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2))))
2622, 25imbi12d 624 . . . . . . . 8 |- (x = ((normh` (A -h B)) / 2) -> ((0 < x -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < x)) <-> (0 < ((normh` (A -h B)) / 2) -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)))))
2726rcla4v 1864 . . . . . . 7 |- (((normh` (A -h B)) / 2) e. RR -> (A.x e. RR (0 < x -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < x)) -> (0 < ((normh` (A -h B)) / 2) -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)))))
2819, 21, 27mp2 43 . . . . . 6 |- (0 < ((normh` (A -h B)) / 2) -> E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)))
295, 10hlimconv 8980 . . . . . . . 8 |- (F ~~>v B -> A.x e. RR (0 < x -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < x)))
309, 29ax-mp 7 . . . . . . 7 |- A.x e. RR (0 < x -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < x))
31 breq2 2613 . . . . . . . . . . 11 |- (x = ((normh` (A -h B)) / 2) -> ((normh` ((F` z) -h B)) < x <-> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2)))
3231imbi2d 610 . . . . . . . . . 10 |- (x = ((normh` (A -h B)) / 2) -> ((w <_ z -> (normh` ((F` z) -h B)) < x) <-> (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2))))
3332rexralbidv 1674 . . . . . . . . 9 |- (x = ((normh` (A -h B)) / 2) -> (E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < x) <-> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2))))
3422, 33imbi12d 624 . . . . . . . 8 |- (x = ((normh` (A -h B)) / 2) -> ((0 < x -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < x)) <-> (0 < ((normh` (A -h B)) / 2) -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2)))))
3534rcla4v 1864 . . . . . . 7 |- (((normh` (A -h B)) / 2) e. RR -> (A.x e. RR (0 < x -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < x)) -> (0 < ((normh` (A -h B)) / 2) -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2)))))
3619, 30, 35mp2 43 . . . . . 6 |- (0 < ((normh` (A -h B)) / 2) -> E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2)))
3728, 36jca 288 . . . . 5 |- (0 < ((normh` (A -h B)) / 2) -> (E.y e. NN A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)) /\ E.w e. NN A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2))))
38 r19.26 1742 . . . . . . . . 9 |- (A.z e. NN ((y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)) /\ (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2))) <-> (A.z e. NN (y <_ z -> (normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2)) /\ A.z e. NN (w <_ z -> (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2))))
39 con3 94 . . . . . . . . . . . 12 |- (((y <_ z /\ w <_ z) -> ((normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2) /\ (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2))) -> (-. ((normh` ((F` z) -h A)) < ((normh` (A -h B)) / 2) /\ (normh` ((F` z) -h B)) < ((normh` (A -h B)) / 2)) -> -. (y <_ z /\ w <_ z)))
4014ltnr 5583 . . . . . . . . . . . . 13 |- -. (normh` (A -h B)) < (normh` (A -h B))
415, 6hlimseq 8978 . . . . . . . . . . . . . . . . . . 19 |- (F ~~>v A -> F:NN-->H~)
424, 41ax-mp 7 . . . . . . . . . . . . . . . . . 18 |- F:NN-->H~
4342ffvelrni 3800 . . . . . . . . . . . . . . . . 17 |- (z e. NN -> (F` z) e. H~)
44 normsubt 8931 . . . . . . . . . . . . . . . . . 18 |- (((F` z) e. H~ /\ A e. H~) -> (normh` ((F` z) -h A)) = (normh` (A -h (F` z))))
458, 44mpan2 694 . . . . . . . . . . . . . . . . 17 |- ((F` z) e. H~ -> (normh` ((F` z) -h A)) = (normh` (A -h (F` z))))
4643, 45syl 10 . . . . . . . . . . . . . . . 16 |- (z e. NN -> (normh` ((F` z) -h A)) = (normh` (A -h (F` z))))
4746breq1d 2619 . . . . . . . . . . . . . . 15 |- (z e. NN -> ((