1515 FOR K=1 TO 4 : SD(K)=0 : GL(K)=0 : DM(K)=0 : NEXT K