HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
GIF version

Theorem sm1cnilem 8343
Description: Lemma for sm1cni 8344.
Hypotheses
Ref Expression
sm1cni.1 X = (Base ‘U)
sm1cni.4 S = ( ·sU)
sm1cni.7 C = (abs − )
sm1cni.8 D = (IndMet ‘U)
sm1cni.j J = (Open ‘C)
sm1cni.k K = (Open ‘D)
sm1cni.f F = {w, v(w v = (wSA))}
sm1cni.9 U NrmCVec
sm1cni.a A X
sm1cni.2 G = ( +vU)
sm1cnilem.6 N = (norm ‘U)
Assertion
Ref Expression
sm1cnilem F (J Cn K)
Distinct variable groups:   w,v,A   v,S,w   v,X,w

Proof of Theorem sm1cnilem
StepHypRef Expression
1 sm1cni.7 . . . 4 C = (abs − )
21cnmet 7901 . . 3 C Met
3 sm1cni.9 . . . 4 U NrmCVec
4 sm1cni.8 . . . . 5 D = (IndMet ‘U)
54imsmet 8320 . . . 4 (U NrmCVec → D Met)
63, 5ax-mp 7 . . 3 D Met
71cnmetba 7900 . . . 4 = dom dom C
8 sm1cni.j . . . 4 J = (Open ‘C)
9 sm1cni.1 . . . . 5 X = (Base ‘U)
109, 4, 3imsbai 8318 . . . 4 X = dom dom D
11 sm1cni.k . . . 4 K = (Open ‘D)
127, 8, 10, 11metcn 7886 . . 3 ((C Met D Met) → (F (J Cn K) ↔ (F:–→X r s (0 < st (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s))))))
132, 6, 12mp2an 699 . 2 (F (J Cn K) ↔ (F:–→X r s (0 < st (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s)))))
14 sm1cni.f . . 3 F = {w, v(w v = (wSA))}
15 sm1cni.a . . . 4 A X
16 sm1cni.4 . . . . 5 S = ( ·sU)
179, 16nvscl 8243 . . . 4 ((U NrmCVec w A X) → (wSA) X)
183, 15, 17mp3an13 909 . . 3 (w → (wSA) X)
1914, 18fopab 3833 . 2 F:–→X
20 opreq2 3975 . . . . . . . . . . 11 ((NA) = 0 → ((abs ‘(ru)) · (NA)) = ((abs ‘(ru)) · 0))
2120breq1d 2634 . . . . . . . . . 10 ((NA) = 0 → (((abs ‘(ru)) · (NA)) < s ↔ ((abs ‘(ru)) · 0) < s))
2221imbi2d 614 . . . . . . . . 9 ((NA) = 0 → (((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s) ↔ ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)))
2322ralbidv 1666 . . . . . . . 8 ((NA) = 0 → (u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s) ↔ u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)))
2423anbi2d 618 . . . . . . 7 ((NA) = 0 → ((0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)) ↔ (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s))))
2524rexbidv 1667 . . . . . 6 ((NA) = 0 → (t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)) ↔ t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s))))
26 breq2 2628 . . . . . . . . 9 (t = (s / (NA)) → (0 < t ↔ 0 < (s / (NA))))
27 breq2 2628 . . . . . . . . . . 11 (t = (s / (NA)) → ((abs ‘(ru)) < t ↔ (abs ‘(ru)) < (s / (NA))))
2827imbi1d 615 . . . . . . . . . 10 (t = (s / (NA)) → (((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s) ↔ ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s)))
2928ralbidv 1666 . . . . . . . . 9 (t = (s / (NA)) → (u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s) ↔ u ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s)))
3026, 29anbi12d 630 . . . . . . . 8 (t = (s / (NA)) → ((0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)) ↔ (0 < (s / (NA)) u ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s))))
3130rcla4ev 1880 . . . . . . 7 (((s / (NA)) (0 < (s / (NA)) u ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s))) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)))
32 sm1cnilem.6 . . . . . . . . . . 11 N = (norm ‘U)
339, 32, 3, 15nvcli 8284 . . . . . . . . . 10 (NA)
34 redivclt 5802 . . . . . . . . . 10 ((s (NA) (NA) ≠ 0) → (s / (NA)) )
3533, 34mp3an2 906 . . . . . . . . 9 ((s (NA) ≠ 0) → (s / (NA)) )
3635adantll 394 . . . . . . . 8 (((r s ) (NA) ≠ 0) → (s / (NA)) )
3736adantlr 395 . . . . . . 7 ((((r s ) 0 < s) (NA) ≠ 0) → (s / (NA)) )
38 divgt0t 5857 . . . . . . . . . . 11 (((s 0 < s) ((NA) 0 < (NA))) → 0 < (s / (NA)))
3933, 38mpanr1 711 . . . . . . . . . 10 (((s 0 < s) 0 < (NA)) → 0 < (s / (NA)))
409, 32nvge0 8298 . . . . . . . . . . . 12 ((U NrmCVec A X) → 0 ≤ (NA))
413, 15, 40mp2an 699 . . . . . . . . . . 11 0 ≤ (NA)
42 0re 5452 . . . . . . . . . . . . 13 0
4342, 33ltlen 5588 . . . . . . . . . . . 12 (0 < (NA) ↔ (0 ≤ (NA) (NA) ≠ 0))
4443biimpr 152 . . . . . . . . . . 11 ((0 ≤ (NA) (NA) ≠ 0) → 0 < (NA))
4541, 44mpan 697 . . . . . . . . . 10 ((NA) ≠ 0 → 0 < (NA))
4639, 45sylan2 453 . . . . . . . . 9 (((s 0 < s) (NA) ≠ 0) → 0 < (s / (NA)))
4746adantlll 398 . . . . . . . 8 ((((r s ) 0 < s) (NA) ≠ 0) → 0 < (s / (NA)))
48 ltmuldivtOLD 5866 . . . . . . . . . . 11 ((((abs ‘(ru)) (NA) s ) 0 < (NA)) → (((abs ‘(ru)) · (NA)) < s ↔ (abs ‘(ru)) < (s / (NA))))
49 subclt 5379 . . . . . . . . . . . . . . . 16 ((r u ) → (ru) )
50 absclt 6833 . . . . . . . . . . . . . . . 16 ((ru) → (abs ‘(ru)) )
5149, 50syl 10 . . . . . . . . . . . . . . 15 ((r u ) → (abs ‘(ru)) )
5251adantlr 395 . . . . . . . . . . . . . 14 (((r s ) u ) → (abs ‘(ru)) )
5352adantlr 395 . . . . . . . . . . . . 13 ((((r s ) 0 < s) u ) → (abs ‘(ru)) )
5453adantlr 395 . . . . . . . . . . . 12 (((((r s ) 0 < s) (NA) ≠ 0) u ) → (abs ‘(ru)) )
5533a1i 8 . . . . . . . . . . . 12 (((((r s ) 0 < s) (NA) ≠ 0) u ) → (NA) )
56 simplr 415 . . . . . . . . . . . . 13 (((r s ) 0 < s) → s )
5756ad2antrr 406 . . . . . . . . . . . 12 (((((r s ) 0 < s) (NA) ≠ 0) u ) → s )
5854, 55, 573jca 821 . . . . . . . . . . 11 (((((r s ) 0 < s) (NA) ≠ 0) u ) → ((abs ‘(ru)) (NA) s ))
5945ad2antlr 407 . . . . . . . . . . 11 (((((r s ) 0 < s) (NA) ≠ 0) u ) → 0 < (NA))
6048, 58, 59sylanc 473 . . . . . . . . . 10 (((((r s ) 0 < s) (NA) ≠ 0) u ) → (((abs ‘(ru)) · (NA)) < s ↔ (abs ‘(ru)) < (s / (NA))))
6160biimprd 154 . . . . . . . . 9 (((((r s ) 0 < s) (NA) ≠ 0) u ) → ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s))
6261r19.21aiva 1717 . . . . . . . 8 ((((r s ) 0 < s) (NA) ≠ 0) → u ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s))
6347, 62jca 288 . . . . . . 7 ((((r s ) 0 < s) (NA) ≠ 0) → (0 < (s / (NA)) u ((abs ‘(ru)) < (s / (NA)) → ((abs ‘(ru)) · (NA)) < s)))
6431, 37, 63sylanc 473 . . . . . 6 ((((r s ) 0 < s) (NA) ≠ 0) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)))
6551recnd 5327 . . . . . . . . . . . . 13 ((r u ) → (abs ‘(ru)) )
66 mul01t 5455 . . . . . . . . . . . . 13 ((abs ‘(ru)) → ((abs ‘(ru)) · 0) = 0)
6765, 66syl 10 . . . . . . . . . . . 12 ((r u ) → ((abs ‘(ru)) · 0) = 0)
6867adantlr 395 . . . . . . . . . . 11 (((r s ) u ) → ((abs ‘(ru)) · 0) = 0)
6968adantlr 395 . . . . . . . . . 10 ((((r s ) 0 < s) u ) → ((abs ‘(ru)) · 0) = 0)
70 simplr 415 . . . . . . . . . 10 ((((r s ) 0 < s) u ) → 0 < s)
7169, 70eqbrtrd 2640 . . . . . . . . 9 ((((r s ) 0 < s) u ) → ((abs ‘(ru)) · 0) < s)
7271a1d 12 . . . . . . . 8 ((((r s ) 0 < s) u ) → ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s))
7372r19.21aiva 1717 . . . . . . 7 (((r s ) 0 < s) → u ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s))
74 lt01 5692 . . . . . . . 8 0 < 1
75 1re 5447 . . . . . . . . 9 1
76 breq2 2628 . . . . . . . . . . 11 (t = 1 → (0 < t ↔ 0 < 1))
77 breq2 2628 . . . . . . . . . . . . 13 (t = 1 → ((abs ‘(ru)) < t ↔ (abs ‘(ru)) < 1))
7877imbi1d 615 . . . . . . . . . . . 12 (t = 1 → (((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s) ↔ ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s)))
7978ralbidv 1666 . . . . . . . . . . 11 (t = 1 → (u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s) ↔ u ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s)))
8076, 79anbi12d 630 . . . . . . . . . 10 (t = 1 → ((0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)) ↔ (0 < 1 u ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s))))
8180rcla4ev 1880 . . . . . . . . 9 ((1 (0 < 1 u ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s))) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)))
8275, 81mpan 697 . . . . . . . 8 ((0 < 1 u ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s)) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)))
8374, 82mpan 697 . . . . . . 7 (u ((abs ‘(ru)) < 1 → ((abs ‘(ru)) · 0) < s) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)))
8473, 83syl 10 . . . . . 6 (((r s ) 0 < s) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · 0) < s)))
8525, 64, 84pm2.61ne 1636 . . . . 5 (((r s ) 0 < s) → t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)))
861cnmetdval 7899 . . . . . . . . . . 11 ((r u ) → (rCu) = (abs ‘(ru)))
8786breq1d 2634 . . . . . . . . . 10 ((r u ) → ((rCu) < t ↔ (abs ‘(ru)) < t))
88 opreq1 3974 . . . . . . . . . . . . . 14 (w = r → (wSA) = (rSA))
89 oprex 3989 . . . . . . . . . . . . . 14 (rSA) V
9088, 14, 89fvopab4 3786 . . . . . . . . . . . . 13 (r → (Fr) = (rSA))
91 opreq1 3974 . . . . . . . . . . . . . 14 (w = u → (wSA) = (uSA))
92 oprex 3989 . . . . . . . . . . . . . 14 (uSA) V
9391, 14, 92fvopab4 3786 . . . . . . . . . . . . 13 (u → (Fu) = (uSA))
9490, 93opreqan12d 3985 . . . . . . . . . . . 12 ((r u ) → ((Fr)D(Fu)) = ((rSA)D(uSA)))
95 sm1cni.2 . . . . . . . . . . . . . . . 16 G = ( +vU)
969, 95, 16, 32, 4imsdval2 8314 . . . . . . . . . . . . . . 15 ((U NrmCVec (rSA) X (uSA) X) → ((rSA)D(uSA)) = (N ‘((rSA)G(-1S(uSA)))))
973, 96mp3an1 905 . . . . . . . . . . . . . 14 (((rSA) X (uSA) X) → ((rSA)D(uSA)) = (N ‘((rSA)G(-1S(uSA)))))
989, 16nvscl 8243 . . . . . . . . . . . . . . 15 ((U NrmCVec r A X) → (rSA) X)
993, 15, 98mp3an13 909 . . . . . . . . . . . . . 14 (r → (rSA) X)
1009, 16nvscl 8243 . . . . . . . . . . . . . . 15 ((U NrmCVec u A X) → (uSA) X)
1013, 15, 100mp3an13 909 . . . . . . . . . . . . . 14 (u → (uSA) X)
10297, 99, 101syl2an 456 . . . . . . . . . . . . 13 ((r u ) → ((rSA)D(uSA)) = (N ‘((rSA)G(-1S(uSA)))))
103 eqid 1478 . . . . . . . . . . . . . . . . . 18 (1stU) = (1stU)
104103nvvc 8230 . . . . . . . . . . . . . . . . 17 (U NrmCVec → (1stU) CVec)
1053, 104ax-mp 7 . . . . . . . . . . . . . . . 16 (1stU) CVec
10695vafval 8218 . . . . . . . . . . . . . . . . 17 G = (1st ‘(1stU))
10716smfval 8220 . . . . . . . . . . . . . . . . 17 S = (2nd ‘(1stU))
1089, 95bafval 8219 . . . . . . . . . . . . . . . . 17 X = ran G
109106, 107, 108vcsubdir 8171 . . . . . . . . . . . . . . . 16 (((1stU) CVec (r u A X)) → ((ru)SA) = ((rSA)G(-1S(uSA))))
110105, 109mpan 697 . . . . . . . . . . . . . . 15 ((r u A X) → ((ru)SA) = ((rSA)G(-1S(uSA))))
11115, 110mp3an3 907 . . . . . . . . . . . . . 14 ((r u ) → ((ru)SA) = ((rSA)G(-1S(uSA))))
112111fveq2d 3734 . . . . . . . . . . . . 13 ((r u ) → (N ‘((ru)SA)) = (N ‘((rSA)G(-1S(uSA)))))
1139, 16, 32nvs 8286 . . . . . . . . . . . . . . 15 ((U NrmCVec (ru) A X) → (N ‘((ru)SA)) = ((abs ‘(ru)) · (NA)))
1143, 15, 113mp3an13 909 . . . . . . . . . . . . . 14 ((ru) → (N ‘((ru)SA)) = ((abs ‘(ru)) · (NA)))
11549, 114syl 10 . . . . . . . . . . . . 13 ((r u ) → (N ‘((ru)SA)) = ((abs ‘(ru)) · (NA)))
116102, 112, 1153eqtr2d 1516 . . . . . . . . . . . 12 ((r u ) → ((rSA)D(uSA)) = ((abs ‘(ru)) · (NA)))
11794, 116eqtrd 1510 . . . . . . . . . . 11 ((r u ) → ((Fr)D(Fu)) = ((abs ‘(ru)) · (NA)))
118117breq1d 2634 . . . . . . . . . 10 ((r u ) → (((Fr)D(Fu)) < s ↔ ((abs ‘(ru)) · (NA)) < s))
11987, 118imbi12d 628 . . . . . . . . 9 ((r u ) → (((rCu) < t → ((Fr)D(Fu)) < s) ↔ ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)))
120119ralbidva 1662 . . . . . . . 8 (r → (u ((rCu) < t → ((Fr)D(Fu)) < s) ↔ u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s)))
121120anbi2d 618 . . . . . . 7 (r → ((0 < t u ((rCu) < t → ((Fr)D(Fu)) < s)) ↔ (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s))))
122121rexbidv 1667 . . . . . 6 (r → (t (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s)) ↔ t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s))))
123122ad2antrr 406 . . . . 5 (((r s ) 0 < s) → (t (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s)) ↔ t (0 < t u ((abs ‘(ru)) < t → ((abs ‘(ru)) · (NA)) < s))))
12485, 123mpbird 196 . . . 4 (((r s ) 0 < s) → t (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s)))
125124ex 373 . . 3 ((r s ) → (0 < st (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s))))
126125rgen2 1726 . 2 r s (0 < st (0 < t u ((rCu) < t → ((Fr)D(Fu)) < s)))
12713, 19, 126mpbir2an 732 1 F (J Cn K)
Colors of variables: wff set class
Syntax hints:   → wi 3   ↔ wb 146   wa 223   w3a 777   = wceq 958   wcel 960   ≠ wne 1588  wral 1648  wrex 1649   class class class wbr 2624  {copab 2671   ccom 3180  –→wf 3184   ‘cfv 3188  (class class class)co 3969  1st c1st 4083  cc 5244  cr 5245  0cc0 5246  1c1 5247   · cmul 5251   − cmin 5304  -cneg 5305   / cdiv 5306   ≤ cle 5307   < clt 5498  abscabs 6751   Cn ccn 7749  Metcme 7786  Opencopn 7789  CVeccvc 8160  NrmCVeccnv 8199   +v cpv 8200  Basecba 8201   ·s cns 8202  normcnm 8205  IndMetcims 8206
This theorem is referenced by:  sm1cni 8344
This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 964  ax-gen 965  ax-8 966  ax-9 967  ax-10 968  ax-11 969  ax-12 970  ax-13 971  ax-14 972  ax-17 973  ax-4 975  ax-5o 977  ax-6o 980  ax-9o 1125  ax-10o 1142  ax-16 1212  ax-11o 1220  ax-ext 1462  ax-rep 2698  ax-sep 2708  ax-nul 2715  ax-pow 2748  ax-pr 2785  ax-un 2872  ax-inf2 4634
This theorem depends on definitions:  df-bi 147  df-or 224