Home
last modified time | relevance | path

Searched refs:PIV2 (Results 1 – 25 of 36) sorted by relevance

12

/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Ddlagtf.f181 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Dslagtf.f181 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/xlapack/lapack-3.10.0/SRC/
H A Ddlagtf.f178 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Dslagtf.f178 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/blas/lapack-3.10.0/SRC/
H A Dslagtf.f178 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Ddlagtf.f178 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/
H A Dslagtf.f106 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL local
154 PIV2 = ZERO
159 PIV2 = ABS( C( K ) ) / SCALE2
160 IF( PIV2.LE.PIV1 ) THEN
181 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Ddlagtf.f106 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL local
154 PIV2 = ZERO
159 PIV2 = ABS( C( K ) ) / SCALE2
160 IF( PIV2.LE.PIV1 ) THEN
181 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/lapacke/lapack-3.10.0/SRC/
H A Dslagtf.f178 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Ddlagtf.f178 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/lapack/lapack-3.10.0/SRC/
H A Ddlagtf.f178 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Dslagtf.f178 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/
H A Ddlagtf.f106 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
154 PIV2 = ZERO
159 PIV2 = ABS( C( K ) ) / SCALE2
160 IF( PIV2.LE.PIV1 ) THEN
181 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Dslagtf.f106 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
154 PIV2 = ZERO
159 PIV2 = ABS( C( K ) ) / SCALE2
160 IF( PIV2.LE.PIV1 ) THEN
181 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lapack/double/
H A Ddlagtf.f181 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lapack/single/
H A Dslagtf.f181 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/
H A Dslagtf.f181 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL local
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Ddlagtf.f181 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL local
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/elk/elk-7.2.42/src/LAPACK/
H A Ddlagtf.f181 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lapack/double/
H A Ddlagtf.f181 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lapack/single/
H A Dslagtf.f181 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
229 PIV2 = ZERO
234 PIV2 = ABS( C( K ) ) / SCALE2
235 IF( PIV2.LE.PIV1 ) THEN
256 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/cblas/lapack-3.10.0/SRC/
H A Ddlagtf.f178 DOUBLE PRECISION EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
H A Dslagtf.f178 REAL EPS, MULT, PIV1, PIV2, SCALE1, SCALE2, TEMP, TL
226 PIV2 = ZERO
231 PIV2 = ABS( C( K ) ) / SCALE2
232 IF( PIV2.LE.PIV1 ) THEN
253 IF( ( MAX( PIV1, PIV2 ).LE.TL ) .AND. ( IN( N ).EQ.0 ) )
/dports/math/math77/MATH77/
H A Ddbesyn.f62 double precision LOGPI, LOGTWO, ONE, P, PI, PIV2, PSI1, PSIZ local
336 PIV2 = PI * V2
373 G0 = D2VAL - BGAMSQ * (EM1 / PIV2)
376 G0 = (ONE / TAN(PIV2)) - Q2DXPV**2 * BGAMSQ / PIV2
H A Dsbesyn.f62 real LOGPI, LOGTWO, ONE, P, PI, PIV2, PSI1, PSIZ local
336 PIV2 = PI * V2
373 G0 = D2VAL - BGAMSQ * (EM1 / PIV2)
376 G0 = (ONE / TAN(PIV2)) - Q2DXPV**2 * BGAMSQ / PIV2

12