Lines Matching refs:HALF
476 COMPLEX*16 ZERO, HALF local
478 $ HALF = ( 0.5D0, 0.0D0 ) )
604 TRANSL = HALF
832 COMPLEX*16 ZERO, HALF local
834 $ HALF = ( 0.5D0, 0.0D0 ) )
946 TRANSL = HALF
1188 COMPLEX*16 ZERO, HALF, ONE local
1190 $ HALF = ( 0.5D0, 0.0D0 ),
1324 TRANSL = HALF
1571 COMPLEX*16 ZERO, HALF, ONE local
1573 $ HALF = ( 0.5D0, 0.0D0 ),
1648 TRANSL = HALF
1849 COMPLEX*16 ZERO, HALF, ONE local
1851 $ HALF = ( 0.5D0, 0.0D0 ),
1939 TRANSL = HALF
2143 COMPLEX*16 ZERO, HALF, ONE local
2145 $ HALF = ( 0.5D0, 0.0D0 ),
2234 TRANSL = HALF