let f1, f2 be Function of (X *),(Y *); :: thesis: ( ( for p being Element of X * holds f1 . p = f * p ) & ( for p being Element of X * holds f2 . p = f * p ) implies f1 = f2 ) assume that A2:
for p being Element of X * holds f1 . p = f * p
and A3:
for p being Element of X * holds f2 . p = f * p
; :: thesis: f1 = f2