Home
last modified time | relevance | path

Searched refs:DCOT (Results 1 – 17 of 17) sorted by relevance

/dports/math/slatec/src/
H A Ddcot.f2 DOUBLE PRECISION FUNCTION DCOT (X)
90 DCOT = 1.0D0/X
91 IF (Y.GT.XSML) DCOT = (0.5D0 + DCSEVL (32.0D0*Y*Y-1.D0, COTCS,
96 DCOT = (0.5D0 + DCSEVL (8.D0*Y*Y-1.D0, COTCS, NTERMS))/(0.5D0*Y)
97 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
100 30 DCOT = (0.5D0 + DCSEVL (2.D0*Y*Y-1.D0, COTCS, NTERMS))/(.25D0*Y)
101 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
102 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
104 40 IF (X.NE.0.D0) DCOT = SIGN (DCOT, X)
105 IF (IFN.EQ.1) DCOT = -DCOT
H A Ddpsi.f42 1 Y, DCOT, DCSEVL, D1MACH
44 EXTERNAL DCOT
159 1 - PI*DCOT(PI*X)
H A Ddpoch1.f53 2 SQTBIG, TERM, TRIG, VAR, VAR2, D1MACH, DPSI, DEXPRL, DCOT, DPOCH
55 EXTERNAL DCOT
152 TRIG = SINPXX*DCOT(PI*B) - 2.0D0*SINPX2*(SINPX2/X)
H A Ddpoch.f31 1 SGNGA, SGNGAX, DFAC, DLNREL, D9LGMC, DGAMMA, DGAMR, DCOT
94 1 DPOCH/(COS(PI*X) + DCOT(PI*A)*SIN(PI*X) )
/dports/math/cmlib/cmlib-3.0_8/src/fnlib/
H A Ddcot.f1 DOUBLE PRECISION FUNCTION DCOT(X) function
77 DCOT = 1.0D0/X
78 IF (Y.GT.XSML) DCOT = (0.5D0 + DCSEVL (32.0D0*Y*Y-1.D0, COTCS,
83 DCOT = (0.5D0 + DCSEVL (8.D0*Y*Y-1.D0, COTCS, NTERMS))/(0.5D0*Y)
84 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
87 30 DCOT = (0.5D0 + DCSEVL (2.D0*Y*Y-1.D0, COTCS, NTERMS))/(.25D0*Y)
88 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
89 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
91 40 IF (X.NE.0.D0) DCOT = DSIGN (DCOT, X)
92 IF (IFN.EQ.1) DCOT = -DCOT
H A Ddpoch.f23 1 SGNGA, SGNGAX, DFAC, DLNREL, D9LGMC, DGAMMA, DGAMR, DCOT, DINT
84 1 DPOCH/(DCOS(PI*X) + DCOT(PI*A)*DSIN(PI*X) )
H A Ddpoch1.f43 2 SQTBIG, TERM, TRIG, VAR, VAR2, D1MACH, DPSI, DEXPRL, DCOT, DPOCH
137 TRIG = SINPXX*DCOT(PI*B) - 2.0D0*SINPX2*(SINPX2/X)
H A Ddpsi.f32 1 Y, DINT, DCOT, DCSEVL, D1MACH
143 1 - PI*DCOT(PI*X)
/dports/math/cmlib/cmlib-3.0_8/doc/fnlib/
H A Ddcot2 DOUBLE PRECISION FUNCTION DCOT(X)
3 C***BEGIN PROLOGUE DCOT
13 C DCOT(X) calculates the double precision trigonometric cotangent
23 C***END PROLOGUE DCOT
H A Ddpoch19 C***ROUTINES CALLED D9LGMC,DCOT,DFAC,DGAMMA,DGAMR,DINT,DLGAMS,DLNREL,
H A Ddpsi30 C***ROUTINES CALLED D1MACH,DCOT,DCSEVL,DINT,INITDS,XERROR
H A Ddpoch140 C***ROUTINES CALLED D1MACH,DCOT,DEXPRL,DPOCH,DPSI,XERROR
H A DSummary49 C Cotangent cot x COT(X) DCOT CCOT
/dports/math/slatec/
H A Ddfnck.f47 + DCOT,DDAWS,DE1,DEI,DERF,DEXPRL,DFAC,DGAMI,DGAMIC,
50 EXTERNAL DCOT, DERF, DGAMMA
179 Y( 9) = DCOT(1.D0)
180 Y( 10) = DCOT(-.5D0)
/dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/
H A Ddp6.F5171 DOUBLE PRECISION FUNCTION DCOT (X) function
5229 DCOT=DBLE(CPUMIN)
5280 DCOT = 1.0D0/X
5281 IF (Y.GT.XSML) DCOT = (0.5D0 + DCSEVL (32.0D0*Y*Y-1.D0, COTCS,
5286 DCOT = (0.5D0 + DCSEVL (8.D0*Y*Y-1.D0, COTCS, NTERMS))/(0.5D0*Y)
5287 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
5290 30 DCOT = (0.5D0 + DCSEVL (2.D0*Y*Y-1.D0, COTCS, NTERMS))/(.25D0*Y)
5291 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
5292 DCOT = (DCOT*DCOT-1.D0)*0.5D0/DCOT
5294 40 IF (X.NE.0.D0) DCOT = SIGN (DCOT, X)
[all …]
H A Ddp7.F4599 1 SGNGA, SGNGAX, DFAC, DLNREL, D9LGMC, DGAMMA, DGAMR, DCOT
4601 EXTERNAL DCOT
4671 1 DPOCH/(COS(PI*X) + DCOT(PI*A)*SIN(PI*X) )
4737 2 SQTBIG, TERM, TRIG, VAR, VAR2, DPSI, DEXPRL, DCOT, DPOCH
4739 EXTERNAL DCOT
4844 TRIG = SINPXX*DCOT(PI*B) - 2.0D0*SINPX2*(SINPX2/X)
4899 1 Y, DCOT, DCSEVL
4901 EXTERNAL DCOT
5030 1 - PI*DCOT(PI*X)
/dports/cad/calculix/CalculiX/cgx_2.18/examples/cad/
H A Dhalter.fbd16082 PNT DCOT -4.400000000000e+01 1.160000000000e+02 -4.000000000000e+00
30806 NURS N02L CONTROL 3 3 DCOT 1.000000
48065 SETA A001 p DCOT