function A1=defla(A,l,x,y)

A1=A - (l/(y'*x))*x*y'