Lines Matching defs:IN
84 * .. Scalars in Common ..
273 * Test each subroutine in turn.
397 9991 FORMAT( ' AMEND DATA FILE OR INCREASE ARRAY SIZES IN PROGRAM',
401 9989 FORMAT( ' ERROR IN SMMCH - IN-LINE DOT PRODUCTS ARE BEING EVALU',
404 $ 'ERR = ', F12.3, '.', /' THIS MAY BE DUE TO FAULTS IN THE ',
448 INTEGER I, IA, IB, ICA, ICB, IK, IM, IN, K, KS, LAA,
463 * .. Scalars in Common ..
480 DO 100 IN = 1, NIDIM
481 N = IDIM( IN )
776 INTEGER I, IA, IB, ICS, ICU, IM, IN, LAA, LBB, LCC,
791 * .. Scalars in Common ..
808 DO 90 IN = 1, NIDIM
809 N = IDIM( IN )
1085 INTEGER I, IA, ICD, ICS, ICT, ICU, IM, IN, J, LAA, LBB,
1102 * .. Scalars in Common ..
1125 DO 130 IN = 1, NIDIM
1126 N = IDIM( IN )
1445 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, K, KS,
1461 * .. Scalars in Common ..
1475 DO 100 IN = 1, NIDIM
1476 N = IDIM( IN )
1762 INTEGER I, IA, IB, ICT, ICU, IK, IN, J, JC, JJ, JJAB,
1778 * .. Scalars in Common ..
1792 DO 130 IN = 1, NIDIM
1793 N = IDIM( IN )
2090 * Stores the values in the array AA in the data structure required
2130 * Generate data in array A.
2155 * Store elements in array AS in data structure required by routine.
2234 * Compute expected result, one column at a time, in CT using data
2235 * in A, B and C.
2236 * Compute gauges in G.
2355 * Tests if selected elements in two arrays are equal.
2446 * IC is used to break up the period by skipping 1 value of I in 6.
