let x, y be set ; :: thesis: for f being Function st x in dom f & y in dom f holds
(Swap (f,x,y)) . y = f . x

let f be Function; :: thesis: ( x in dom f & y in dom f implies (Swap (f,x,y)) . y = f . x )
assume A1: ( x in dom f & y in dom f ) ; :: thesis: (Swap (f,x,y)) . y = f . x
then A2: Swap (f,x,y) = (f +* (x,(f . y))) +* (y,(f . x)) by FUNCT_7:def 12;
dom f = dom (f +* (x,(f . y))) by FUNCT_7:30;
hence (Swap (f,x,y)) . y = f . x by A1, A2, FUNCT_7:31; :: thesis: verum