Lines Matching refs:NBET
64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
150 READ( NIN, FMT = * )NBET
151 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
155 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
162 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
287 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
293 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
304 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
310 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
367 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
387 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
393 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
501 DO 50 IB = 1, NBET
652 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
672 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
678 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
773 DO 50 IB = 1, NBET
1241 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1261 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
1267 $ BB( NMAX*NMAX ), BET( NBET ), BS( NMAX*NMAX ),
1356 DO 50 IB = 1, NBET
1573 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1593 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
1599 $ BET( NBET ), BS( NMAX*NMAX ), C( NMAX, NMAX ),
1701 DO 80 IB = 1, NBET