Lines Matching refs:NALF
59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
136 READ( NIN, FMT = * )NALF
137 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
141 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
154 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
279 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
285 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
291 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
296 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
357 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
375 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
379 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
484 DO 60 IA = 1, NALF
638 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
656 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
660 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
752 DO 60 IA = 1, NALF
908 $ FATAL, NIDIM, IDIM, NALF, ALF, NMAX, A, AA, AS, argument
926 INTEGER NALF, NIDIM, NMAX, NOUT, NTRA local
930 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1015 DO 80 IA = 1, NALF
1213 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1231 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
1235 REAL A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1316 DO 60 IA = 1, NALF
1488 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
1506 INTEGER NALF, NBET, NIDIM, NMAX, NOUT, NTRA local
1511 $ ALF( NALF ), AS( NMAX*NMAX ), BB( NMAX*NMAX ),
1608 DO 90 IA = 1, NALF