Lines Matching refs:ISCA

2      &                          I,ISCA,SSCA)
14        DIMENSION SKAIIB(*),SSCA(*),ISCA(*)
41             IF(ISCA(KA).NE.0) THEN
44               IROW = ISCA(KA)
57             IF(ISCA(KA).NE.0) THEN
60               IROW = ISCA(KA)
75      &                          J,ISCA,SSCA)
85       DIMENSION CB(NJB,NJA), SSCA(*),ISCA(*)
121             IF(ISCA(KA).LT.0) THEn
123               WRITE(6,*) ' KA, ISCA(KA) = ', KA, ISCA(KA)
128             IF(ISCA(KA).NE.0) THEN
130               IROW = ISCA(KA)
150             IF(ISCA(KA).NE.0) THEN
152               IROW = ISCA(KA)
1460      &                  ISCA,SSCA)
1472       DIMENSION ISCA(*),SSCA(*),MATIN(NCOLIN,NROWIN)
1491           IF(ISCA(I).NE.0) THEN
1493             IROW = ISCA(I)
1497           ELSE IF (ISCA(I).EQ.0) THEN
1508      &                  ISCA,SSCA)
1520       DIMENSION ISCA(*),SSCA(*),MATIN(NROWIN,NCOLIN)
1539           IF(ISCA(I).NE.0) THEN
1541             IROW = ISCA(I)