Lines Matching defs:NALF
83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB,
190 READ( NIN, FMT = * )NALF
191 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
195 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
210 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
327 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
335 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
341 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
364 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
370 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
378 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
384 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
392 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
398 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
463 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
483 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX,
488 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
616 DO 60 IA = 1, NALF
819 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET,
839 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX,
844 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
958 DO 60 IA = 1, NALF
1558 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1579 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA,
1584 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1670 DO 80 IA = 1, NALF
1836 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
1857 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA,
1862 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1947 DO 70 IA = 1, NALF
2130 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX,
2151 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA,
2156 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
2256 DO 100 IA = 1, NALF