Lines Matching refs:IPACK
499 INTEGER I, IDIST, IGRADE, IISUB, IPACK, IPVTNG, IRSIGN,
609 IPACK = 0
611 IPACK = 1
613 IPACK = 2
615 IPACK = 3
617 IPACK = 4
619 IPACK = 5
621 IPACK = 6
623 IPACK = 7
625 IPACK = -1
707 ELSE IF( IPACK.EQ.-1 .OR. ( ( IPACK.EQ.1 .OR. IPACK.EQ.2 .OR.
708 $ IPACK.EQ.5 .OR. IPACK.EQ.6 ) .AND. ISYM.EQ.1 ) .OR.
709 $ ( IPACK.EQ.3 .AND. ISYM.EQ.1 .AND. ( KL.NE.0 .OR. M.NE.
710 $ N ) ) .OR. ( IPACK.EQ.4 .AND. ISYM.EQ.1 .AND. ( KU.NE.
713 ELSE IF( ( ( IPACK.EQ.0 .OR. IPACK.EQ.1 .OR. IPACK.EQ.2 ) .AND.
714 $ LDA.LT.MAX( 1, M ) ) .OR. ( ( IPACK.EQ.3 .OR. IPACK.EQ.
715 $ 4 ) .AND. LDA.LT.1 ) .OR. ( ( IPACK.EQ.5 .OR. IPACK.EQ.
717 $ ( IPACK.EQ.7 .AND. LDA.LT.KLL+KUU+1 ) ) THEN
826 IF( IPACK.EQ.0 ) THEN
848 ELSE IF( IPACK.EQ.1 ) THEN
863 ELSE IF( IPACK.EQ.2 ) THEN
878 ELSE IF( IPACK.EQ.3 ) THEN
902 ELSE IF( IPACK.EQ.4 ) THEN
930 ELSE IF( IPACK.EQ.5 ) THEN
947 ELSE IF( IPACK.EQ.6 ) THEN
960 ELSE IF( IPACK.EQ.7 ) THEN
994 IF( IPACK.EQ.0 ) THEN
1014 ELSE IF( IPACK.EQ.1 ) THEN
1025 ELSE IF( IPACK.EQ.2 ) THEN
1036 ELSE IF( IPACK.EQ.3 ) THEN
1053 ELSE IF( IPACK.EQ.4 ) THEN
1095 ELSE IF( IPACK.EQ.5 ) THEN
1109 ELSE IF( IPACK.EQ.6 ) THEN
1119 ELSE IF( IPACK.EQ.7 ) THEN
1149 IF( IPACK.EQ.0 ) THEN
1151 ELSE IF( IPACK.EQ.1 ) THEN
1153 ELSE IF( IPACK.EQ.2 ) THEN
1155 ELSE IF( IPACK.EQ.3 ) THEN
1157 ELSE IF( IPACK.EQ.4 ) THEN
1159 ELSE IF( IPACK.EQ.5 ) THEN
1161 ELSE IF( IPACK.EQ.6 ) THEN
1163 ELSE IF( IPACK.EQ.7 ) THEN
1181 IF( IPACK.LE.2 ) THEN
1187 ELSE IF( IPACK.EQ.3 .OR. IPACK.EQ.4 ) THEN
1192 ELSE IF( IPACK.GE.5 ) THEN
1205 IF( IPACK.LE.2 ) THEN
1210 ELSE IF( IPACK.EQ.3 .OR. IPACK.EQ.4 ) THEN
1214 ELSE IF( IPACK.GE.5 ) THEN