Lines Matching refs:NBET
130 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
246 READ( NIN, FMT = * )NBET
247 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
251 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
260 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
355 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
439 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
459 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
465 $ AS( NMAX*NMAX ), BET( NBET ), X( NMAX ),
587 DO 50 IB = 1, NBET
785 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
805 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
811 $ AS( NMAX*NMAX ), BET( NBET ), X( NMAX ),
921 DO 50 IB = 1, NBET