1265 IF CA>0 THEN TI(K,L)=TI(K,L)/CA ELSE TI(K,L)=0