Lines Matching refs:IB
448 INTEGER I, IA, IB, ICA, ICB, IK, IM, IN, K, KS, LAA, local
548 DO 50 IB = 1, NBET
549 BETA = BET( IB )
772 INTEGER I, IA, IB, ICS, ICU, IM, IN, LAA, LBB, LCC, local
859 DO 50 IB = 1, NBET
860 BETA = BET( IB )
1440 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, K, KS, local
1516 DO 50 IB = 1, NBET
1517 BETA = BET( IB )
1757 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, JJAB, local
1850 DO 80 IB = 1, NBET
1851 BETA = BET( IB )