2820 HH=HH+TS(K)*XYZ(K)