Lines Matching refs:NBET
80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
194 READ( NIN, FMT = * )NBET
195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
199 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
208 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
304 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
392 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
409 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
415 $ AS( NMAX*NMAX ), BET( NBET ), G( NMAX ),
536 DO 50 IB = 1, NBET
733 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
750 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
756 $ AS( NMAX*NMAX ), BET( NBET ), G( NMAX ),
865 DO 50 IB = 1, NBET