Lines Matching refs:ALS
433 COMPLEX*16 ALPHA, ALS, BETA, BLS, TRANSL
568 ALS = ALPHA
621 ISAME( 4 ) = ALS.EQ.ALPHA
638 ISAME( 6 ) = ALS.EQ.ALPHA
779 COMPLEX*16 ALPHA, ALS, BETA, BLS, TRANSL
900 ALS = ALPHA
957 ISAME( 3 ) = ALS.EQ.ALPHA
972 ISAME( 4 ) = ALS.EQ.ALPHA
986 ISAME( 3 ) = ALS.EQ.ALPHA
1490 COMPLEX*16 ALPHA, ALS, TRANSL
1583 ALS = ALPHA
1626 ISAME( 3 ) = ALS.EQ.ALPHA
2053 COMPLEX*16 ALPHA, ALS, TRANSL
2156 ALS = ALPHA
2202 ISAME( 3 ) = ALS.EQ.ALPHA