let S, E, F be RealNormSpace; for u being PartFunc of S,E
for v being PartFunc of S,F
for w being PartFunc of S,[:E,F:]
for Z being Subset of S st w = <:u,v:> & u is_differentiable_on Z & v is_differentiable_on Z holds
( diff (w,0,Z) is_differentiable_on Z & ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> ) )
let u be PartFunc of S,E; for v being PartFunc of S,F
for w being PartFunc of S,[:E,F:]
for Z being Subset of S st w = <:u,v:> & u is_differentiable_on Z & v is_differentiable_on Z holds
( diff (w,0,Z) is_differentiable_on Z & ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> ) )
let v be PartFunc of S,F; for w being PartFunc of S,[:E,F:]
for Z being Subset of S st w = <:u,v:> & u is_differentiable_on Z & v is_differentiable_on Z holds
( diff (w,0,Z) is_differentiable_on Z & ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> ) )
let w be PartFunc of S,[:E,F:]; for Z being Subset of S st w = <:u,v:> & u is_differentiable_on Z & v is_differentiable_on Z holds
( diff (w,0,Z) is_differentiable_on Z & ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> ) )
let Z be Subset of S; ( w = <:u,v:> & u is_differentiable_on Z & v is_differentiable_on Z implies ( diff (w,0,Z) is_differentiable_on Z & ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> ) ) )
assume A1:
( w = <:u,v:> & u is_differentiable_on Z & v is_differentiable_on Z )
; ( diff (w,0,Z) is_differentiable_on Z & ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> ) )
then A2:
( w is_differentiable_on Z & w `| Z = (CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F)))) * <:(u `| Z),(v `| Z):> )
by Th57;
A3: diff (w,1,Z) =
(w | Z) `| Z
by NDIFF_6:11
.=
w `| Z
by A1, Th4, Th57
;
A4: diff (u,1,Z) =
(u | Z) `| Z
by NDIFF_6:11
.=
u `| Z
by A1, Th4
;
A5: diff (v,1,Z) =
(v | Z) `| Z
by NDIFF_6:11
.=
v `| Z
by A1, Th4
;
A6:
diff (w,0,Z) = w | Z
by NDIFF_6:11;
A7:
CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) is Lipschitzian LinearOperator of [:(diff_SP ((0 + 1),S,E)),(diff_SP ((0 + 1),S,F)):],(R_NormSpace_of_BoundedLinearOperators (S,[:(diff_SP (0,S,E)),(diff_SP (0,S,F)):]))
by Th56;
A8:
diff_SP (0,S,E) = E
by NDIFF_6:7;
A9:
diff_SP (0,S,F) = F
by NDIFF_6:7;
R_NormSpace_of_BoundedLinearOperators (S,[:(diff_SP (0,S,E)),(diff_SP (0,S,F)):]) = diff_SP (1,S,[:E,F:])
by A8, A9, NDIFF_6:7;
then reconsider T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) as Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) by A7;
diff_SP (0,S,[:E,F:]) = [:E,F:]
by NDIFF_6:7;
hence
diff (w,0,Z) is_differentiable_on Z
by A2, A6, Th3; ex T being Lipschitzian LinearOperator of [:(diff_SP (1,S,E)),(diff_SP (1,S,F)):],(diff_SP (1,S,[:E,F:])) st
( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> )
take
T
; ( T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F))) & diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):> )
thus
T = CTP (S,(diff_SP (0,S,E)),(diff_SP (0,S,F)))
; diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):>
thus
diff (w,1,Z) = T * <:(diff (u,1,Z)),(diff (v,1,Z)):>
by A1, A3, A4, A5, Th57; verum