Lines Matching refs:ALF
93 $ ALF( NALMAX ), AS( NMAX*NMAX ), BET( NBEMAX ), variable
198 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
213 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
315 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
333 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
339 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
400 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
425 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ), local
546 ALPHA = ALF( IA )
746 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
771 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ), local
880 ALPHA = ALF( IA )
1457 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, argument
1482 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ), local
1569 ALPHA = ALF( IA )
1735 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, argument
1760 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ), local
1840 RALPHA = DBLE( ALF( IA ) )
2020 $ FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, argument
2045 COMPLEX*16 A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ), local
2140 ALPHA = ALF( IA )