Lines Matching refs:KKI

149       INTEGER KII, KIN, KK, KKI, KKL, KKN  local
334                KKI = I + KK
335                KII = KKI + KDR
342                T = A(KKI) + A(KKN)
343                TS = A(KKN) - A(KKI)
352                   A(KKI) = TP - TS1
359                   A(KKI) = T + TP
394                KKI = I + KK
398                T = A(KKI) + A(KKN)
399                TS = A(KKI) - A(KKN)
405                A(KKI) = T + TS