let f1, f2 be Function of REAL ,REAL ; :: thesis: ( ( for d being Element of REAL holds f1 . d = Im (Sum ((d * <i> ) ExpSeq )) ) & ( for d being Element of REAL holds f2 . d = Im (Sum ((d * <i> ) ExpSeq )) ) implies f1 = f2 )
assume A6: for d being Element of REAL holds f1 . d = Im (Sum ((d * <i> ) ExpSeq )) ; :: thesis: ( ex d being Element of REAL st not f2 . d = Im (Sum ((d * <i> ) ExpSeq )) or f1 = f2 )
assume A7: for d being Element of REAL holds f2 . d = Im (Sum ((d * <i> ) ExpSeq )) ; :: thesis: f1 = f2
for d being Element of REAL holds f1 . d = f2 . d

proof

let d be Element of REAL ; :: thesis: f1 . d = f2 . d
thus f1 . d = Im (Sum ((d * <i> ) ExpSeq )) by A6
.= f2 . d by A7 ; :: thesis: verum

end;

hence f1 = f2 by FUNCT_2:113; :: thesis: verum