Lines Matching refs:NBET
58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
142 READ( NIN, FMT = * )NBET
143 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
147 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
154 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
295 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
301 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
309 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
315 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
337 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
343 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
351 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
357 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
417 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
436 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
442 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
548 DO 50 IB = 1, NBET
745 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
764 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
770 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
863 DO 50 IB = 1, NBET
1414 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1433 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
1439 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
1521 DO 50 IB = 1, NBET
1731 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1750 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA, IORDER local
1756 $ BET( NBET ), BS( NMAX*NMAX ), C( NMAX, NMAX ),
1855 DO 80 IB = 1, NBET