11095 TK(IP,J)=TK(IP,J)/PIV