Lines Matching refs:NALF
64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
143 READ( NIN, FMT = * )NALF
144 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
148 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
161 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
287 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
293 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
299 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
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
391 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
498 DO 60 IA = 1, NALF
652 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
672 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
676 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
770 DO 60 IA = 1, NALF
931 $ FATAL, NIDIM, IDIM, NALF, ALF, NMAX, A, AA, AS, argument
951 INTEGER NALF, NIDIM, NMAX, NOUT, NTRA local
955 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1042 DO 80 IA = 1, NALF
1241 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1261 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
1265 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1349 DO 60 IA = 1, NALF
1573 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1593 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
1598 $ ALF( NALF ), AS( NMAX*NMAX ), BB( NMAX*NMAX ),
1698 DO 90 IA = 1, NALF