Lines Matching refs:NBET
63 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
148 READ( NIN, FMT = * )NBET
149 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
153 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
160 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
308 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
316 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
322 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
344 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
350 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
358 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
364 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
426 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
447 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
453 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
561 DO 50 IB = 1, NBET
756 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
777 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
783 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
878 DO 50 IB = 1, NBET
1441 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1462 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
1468 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
1557 DO 50 IB = 1, NBET
1851 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1872 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
1878 $ BET( NBET ), BS( NMAX*NMAX ), C( NMAX, NMAX ),
1980 DO 80 IB = 1, NBET