Lines Matching refs:IK
462 INTEGER I, IA, IB, ICA, ICB, IK, IM, IN, K, KS, LAA,
506 DO 90 IK = 1, NIDIM
507 K = IDIM( IK )
1477 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, K, KS,
1518 DO 90 IK = 1, NIDIM
1519 K = IDIM( IK )
1887 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, JJAB,
1928 DO 120 IK = 1, NIDIM
1929 K = IDIM( IK )
