let f be PartFunc of (REAL 3),REAL ; :: thesis: for u being Element of REAL 3 holds
( ex x0, y0, z0 being Real st
( u = <*x0,y0,z0*> & SVF1 2,f,u is_differentiable_in y0 ) iff f is_partial_differentiable_in u,2 )
let u be Element of REAL 3; :: thesis: ( ex x0, y0, z0 being Real st
( u = <*x0,y0,z0*> & SVF1 2,f,u is_differentiable_in y0 ) iff f is_partial_differentiable_in u,2 )

hereby :: thesis: ( f is_partial_differentiable_in u,2 implies ex x0, y0, z0 being Real st
( u = <*x0,y0,z0*> & SVF1 2,f,u is_differentiable_in y0 ) )

given x0, y0, z0 being Real such that A1: ( u = <*x0,y0,z0*> & SVF1 2,f,u is_differentiable_in y0 ) ; :: thesis: f is_partial_differentiable_in u,2
(proj 2,3) . u = y0 by A1, Th2;
hence f is_partial_differentiable_in u,2 by A1, PDIFF_1:def 11; :: thesis: verum

end;

assume A2: f is_partial_differentiable_in u,2 ; :: thesis: ex x0, y0, z0 being Real st
( u = <*x0,y0,z0*> & SVF1 2,f,u is_differentiable_in y0 )
consider x0, y0, z0 being Real such that
A3: u = <*x0,y0,z0*> by FINSEQ_2:123;
(proj 2,3) . u = y0 by A3, Th2;
then SVF1 2,f,u is_differentiable_in y0 by A2, PDIFF_1:def 11;
hence ex x0, y0, z0 being Real st
( u = <*x0,y0,z0*> & SVF1 2,f,u is_differentiable_in y0 ) by A3; :: thesis: verum