defpred S1[ set ] means ex F being PartFunc of REAL ,REAL st
( $1 = F & F is_differentiable_on X & F `| X = f | X );
consider Z being set such that
A1: for x being set holds
( x in Z iff ( x in PFuncs REAL ,REAL & S1[x] ) ) from XBOOLE_0:sch 1();
take Z ; :: thesis: for x being set holds
( x in Z iff ex F being PartFunc of REAL ,REAL st
( x = F & F is_differentiable_on X & F `| X = f | X ) )

let x be set ; :: thesis: ( x in Z iff ex F being PartFunc of REAL ,REAL st
( x = F & F is_differentiable_on X & F `| X = f | X ) )

thus ( x in Z implies ex F being PartFunc of REAL ,REAL st
( x = F & F is_differentiable_on X & F `| X = f | X ) ) by A1; :: thesis: ( ex F being PartFunc of REAL ,REAL st
( x = F & F is_differentiable_on X & F `| X = f | X ) implies x in Z )

given F being PartFunc of REAL ,REAL such that A2: x = F and
A3: F is_differentiable_on X and
A4: F `| X = f | X ; :: thesis: x in Z
F in PFuncs REAL ,REAL by PARTFUN1:119;
hence x in Z by A1, A2, A3, A4; :: thesis: verum