Lines Matching refs:Or
55 * Or
155 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
161 IF( IDIM( I ).LT.0.OR.IDIM( I ).GT.NMAX )THEN
168 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN
181 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
187 IF( INC( I ).EQ.0.OR.ABS( INC( I ) ).GT.INCMAX )THEN
194 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
201 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
273 IF( .NOT.SAME.OR.ERR.NE.RZERO )THEN
281 IF( .NOT.SAME.OR.ERR.NE.RZERO )THEN
366 9997 FORMAT( ' NUMBER OF VALUES OF ', A, ' IS LESS THAN 1 OR GREATER ',
368 9996 FORMAT( ' VALUE OF N IS LESS THAN 0 OR GREATER THAN ', I2 )
370 9994 FORMAT( ' ABSOLUTE VALUE OF INCX OR INCY IS 0 OR GREATER THAN ',
381 9987 FORMAT( ' AMEND DATA FILE OR INCREASE ARRAY SIZES IN PROGRAM',
388 $ ' THIS MAY BE DUE TO FAULTS IN THE ARITHMETIC OR THE COMPILER.'
507 NULL = N.LE.0.OR.M.LE.0
517 TRAN = TRANS.EQ.'T'.OR.TRANS.EQ.'C'
682 * Avoid repeating tests with M.le.0 or
1538 NULL = N.LE.0.OR.M.LE.0
1683 * Avoid repeating tests with M.le.0 or N.le.0.
1842 NULL = N.LE.0.OR.RALPHA.EQ.RZERO
2141 NULL = N.LE.0.OR.ALPHA.EQ.ZERO
2372 * OK is set to .FALSE. by the special version of XERBLA or by CHKXER
2693 * TYPE is 'GE', 'GB', 'HE', 'HB', 'HP', 'TR', 'TB' OR 'TP'.
2731 UPPER = ( SYM.OR.TRI ).AND.UPLO.EQ.'U'
2732 LOWER = ( SYM.OR.TRI ).AND.UPLO.EQ.'L'
2739 IF( GEN.OR.( UPPER.AND.I.LE.J ).OR.( LOWER.AND.I.GE.J ) )
2741 IF( ( I.LE.J.AND.J - I.LE.KU ).OR.
2787 ELSE IF( TYPE.EQ.'HE'.OR.TYPE.EQ.'TR' )THEN
2818 ELSE IF( TYPE.EQ.'HB'.OR.TYPE.EQ.'TB' )THEN
2851 ELSE IF( TYPE.EQ.'HP'.OR.TYPE.EQ.'TP' )THEN
2917 IF( TRAN.OR.CTRAN )THEN
3044 * TYPE is 'GE', 'HE' or 'HP'.
3130 * The sequence of values of I or J is bounded between 1 and 999.
3131 * If initial I or J = 1,2,3,6,7 or 9, the period will be 50.
3132 * If initial I or J = 4 or 8, the period will be 25.
3133 * If initial I or J = 5, the period will be 10.
3134 * IC is used to break up the period by skipping 1 value of I or J
