Lines Matching refs:D0
55 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ),
56 $ ONE = ( 1.0D0, 0.0D0 ) )
58 PARAMETER ( RZERO = 0.0D0, RHALF = 0.5D0, RONE = 1.0D0 )
383 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ) )
385 PARAMETER ( RZERO = 0.0D0 )
668 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ) )
670 PARAMETER ( RZERO = 0.0D0 )
947 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ),
948 $ ONE = ( 1.0D0, 0.0D0 ) )
950 PARAMETER ( RZERO = 0.0D0 )
1258 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ) )
1260 PARAMETER ( RONE = 1.0D0, RZERO = 0.0D0 )
1590 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ),
1591 $ ONE = ( 1.0D0, 0.0D0 ) )
1593 PARAMETER ( RONE = 1.0D0, RZERO = 0.0D0 )
2893 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ),
2894 $ ONE = ( 1.0D0, 0.0D0 ) )
2898 PARAMETER ( RZERO = 0.0D0 )
3019 PARAMETER ( ZERO = ( 0.0D0, 0.0D0 ) )
3021 PARAMETER ( RZERO = 0.0D0, RONE = 1.0D0 )
3335 ZBEG = DCMPLX( ( I - 500 )/1001.0D0, ( J - 500 )/1001.0D0 )