Home
last modified time | relevance | path

Searched refs:TWOPI (Results 1 – 25 of 856) sorted by relevance

12345678910>>...35

/dports/astro/xearth/xearth-1.2/
H A Dsunpos.c56 #define TWOPI (2*M_PI) macro
57 #define DegsToRads(x) ((x)*(TWOPI/360))
78 #define RadsPerDay (TWOPI/365.242191)
161 N = fmod(N, TWOPI);
162 if (N < 0) N += TWOPI;
165 if (M < 0) M += TWOPI;
295 *lon = tmp * (360/TWOPI);
296 *lat = delta * (360/TWOPI);
341 alpha -= (TWOPI/24)*GST(ssue);
343 *lon = alpha * (360/TWOPI);
[all …]
/dports/audio/audacity/audacity-Audacity-3.1.3/lib-src/libsbsms/src/
H A Dutils.h13 #define TWOPI 6.28318530717958647692528676655900576f macro
41 ph -= TWOPI * lrintf(ph * ONEOVERTWOPI); in canonPI()
42 if(ph < -PI) ph += TWOPI; in canonPI()
43 else if(ph >= PI) ph -= TWOPI; in canonPI()
49 ph -= TWOPI * lrintf(ph * ONEOVERTWOPI); in canon2PI()
50 if(ph < 0.0f) ph += TWOPI; in canon2PI()
51 if(ph >= TWOPI) ph -= TWOPI; in canon2PI()
/dports/science/latte/LATTE-1.2.2/src/
H A Dinitcoulomb.F9051 TWOPI = TWO*PI
72 RECIPVECS(1,1) = TWOPI*A2XA3(1)/DOT
73 RECIPVECS(1,2) = TWOPI*A2XA3(2)/DOT
74 RECIPVECS(1,3) = TWOPI*A2XA3(3)/DOT
86 RECIPVECS(2,1) = TWOPI*A3XA1(1)/DOT
87 RECIPVECS(2,2) = TWOPI*A3XA1(2)/DOT
88 RECIPVECS(2,3) = TWOPI*A3XA1(3)/DOT
100 RECIPVECS(3,1) = TWOPI*A1XA2(1)/DOT
101 RECIPVECS(3,2) = TWOPI*A1XA2(2)/DOT
102 RECIPVECS(3,3) = TWOPI*A1XA2(3)/DOT
/dports/math/math77/MATH77/demo/
H A Ddrdrft1.f20 double precision PI, TWOPI, RTWO, ZERO, ONE, FOUR, P1, P3 variable
23 parameter (TWOPI = 2.D0 * PI)
56 F(K+1) = SIG*(SIN(TWOPI*(T+P1)) + FOUR*COS(TWOPI*(RTWO*T+P3)))
57 F(N-K+1)=SIG*(SIN(TWOPI*(TB+P1))+FOUR*COS(TWOPI*(RTWO*TB+P3)))
61 F(N2+1) = SIN(TWOPI*(T+P1)) + FOUR*COS(TWOPI*(RTWO*T+P3))
H A Ddrsrft1.f20 real PI, TWOPI, RTWO, ZERO, ONE, FOUR, P1, P3 variable
23 parameter (TWOPI = 2.E0 * PI)
56 F(K+1) = SIG*(SIN(TWOPI*(T+P1)) + FOUR*COS(TWOPI*(RTWO*T+P3)))
57 F(N-K+1)=SIG*(SIN(TWOPI*(TB+P1))+FOUR*COS(TWOPI*(RTWO*TB+P3)))
61 F(N2+1) = SIN(TWOPI*(T+P1)) + FOUR*COS(TWOPI*(RTWO*T+P3))
/dports/astro/wmglobe/wmglobe-1.3/src/
H A Dsunpos.c64 #define TWOPI (2*PI) macro
65 #define DegsToRads(x) ((x)*(TWOPI/360))
86 #define RadsPerDay (TWOPI/365.242191)
124 do (x) += TWOPI; while ((x) < -PI); \
126 do (x) -= TWOPI; while ((x) > PI); \
167 N = fmod(N, TWOPI); in mean_sun()
169 N += TWOPI; in mean_sun()
173 M += TWOPI; in mean_sun()
310 tmp = alpha - (TWOPI / 24) * GST(ssue); in sun_position()
336 L = fmod(D / SideralMonth, 1.0) * TWOPI + MoonMeanLongitude; in moon_position()
[all …]
/dports/math/xlapack/lapack-3.10.0/TESTING/MATGEN/
H A Dzlarnd.f92 DOUBLE PRECISION TWOPI
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839D+0 )
127 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
132 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
137 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f92 REAL TWOPI
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839E+0 )
127 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
132 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
137 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/blas/lapack-3.10.0/TESTING/MATGEN/
H A Dzlarnd.f92 DOUBLE PRECISION TWOPI local
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839D+0 )
127 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
132 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
137 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f92 REAL TWOPI local
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839E+0 )
127 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
132 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
137 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/lapacke/lapack-3.10.0/TESTING/MATGEN/
H A Dzlarnd.f92 DOUBLE PRECISION TWOPI
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839D+0 )
127 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
132 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
137 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f92 REAL TWOPI
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839E+0 )
127 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
132 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
137 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/lapack/lapack-3.10.0/TESTING/MATGEN/
H A Dzlarnd.f92 DOUBLE PRECISION TWOPI local
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839D+0 )
127 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
132 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
137 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f92 REAL TWOPI local
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839E+0 )
127 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
132 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
137 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/MATGEN/
H A Dzlarnd.f95 DOUBLE PRECISION TWOPI local
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663D+0 )
130 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
135 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
140 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f95 REAL TWOPI
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663E+0 )
130 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
135 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
140 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/MATGEN/
H A Dzlarnd.f95 DOUBLE PRECISION TWOPI
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663D+0 )
130 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
135 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
140 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f95 REAL TWOPI
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663E+0 )
130 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
135 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
140 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/MATGEN/
H A Dzlarnd.f95 DOUBLE PRECISION TWOPI local
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663D+0 )
130 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
135 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
140 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f95 REAL TWOPI local
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663E+0 )
130 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
135 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
140 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/MATGEN/
H A Dzlarnd.f95 DOUBLE PRECISION TWOPI
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663D+0 )
130 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
135 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
140 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
H A Dclarnd.f95 REAL TWOPI local
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663E+0 )
130 CLARND = SQRT( -TWO*LOG( T1 ) )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
135 CLARND = SQRT( T1 )*EXP( CMPLX( ZERO, TWOPI*T2 ) )
140 CLARND = EXP( CMPLX( ZERO, TWOPI*T2 ) )
/dports/math/cblas/lapack-3.10.0/TESTING/MATGEN/
H A Dzlarnd.f92 DOUBLE PRECISION TWOPI
93 PARAMETER ( TWOPI = 6.28318530717958647692528676655900576839D+0 )
127 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
132 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
137 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/MATGEN/
H A Dzlarnd.f95 DOUBLE PRECISION TWOPI
96 PARAMETER ( TWOPI = 6.2831853071795864769252867663D+0 )
130 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
135 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
140 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )
/dports/math/scalapack/scalapack-2.1.0/TOOLS/LAPACK/
H A Dzlarnd.f49 DOUBLE PRECISION TWOPI
50 PARAMETER ( TWOPI = 6.2831853071795864769252867663D+0 )
84 ZLARND = SQRT( -TWO*LOG( T1 ) )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
89 ZLARND = SQRT( T1 )*EXP( DCMPLX( ZERO, TWOPI*T2 ) )
94 ZLARND = EXP( DCMPLX( ZERO, TWOPI*T2 ) )

12345678910>>...35