Lines Matching refs:HALF
452 COMPLEX*16 ZERO, HALF local
454 $ HALF = ( 0.5D0, 0.0D0 ) )
572 TRANSL = HALF
798 COMPLEX*16 ZERO, HALF local
800 $ HALF = ( 0.5D0, 0.0D0 ) )
906 TRANSL = HALF
1146 COMPLEX*16 ZERO, HALF, ONE local
1148 $ HALF = ( 0.5D0, 0.0D0 ),
1263 TRANSL = HALF
1509 COMPLEX*16 ZERO, HALF, ONE local
1511 $ HALF = ( 0.5D0, 0.0D0 ),
1585 TRANSL = HALF
1787 COMPLEX*16 ZERO, HALF, ONE local
1789 $ HALF = ( 0.5D0, 0.0D0 ),
1870 TRANSL = HALF
2072 COMPLEX*16 ZERO, HALF, ONE local
2074 $ HALF = ( 0.5D0, 0.0D0 ),
2156 TRANSL = HALF