Lines Matching defs:BLS
400 COMPLEX*16 ALPHA, ALS, BETA, BLS529 BLS = BETA566 ISAME( 11 ) = BLS.EQ.BETA685 COMPLEX*16 ALPHA, ALS, BETA, BLS800 BLS = BETA840 ISAME( 10 ) = BLS.EQ.BETA