2800 SA=C(1)*A(2,J)+(1-C(1))*A(1,J)