/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | dlagtf.f | 181 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 D | slagtf.f | 181 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 D | dlagtf.f | 178 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 D | slagtf.f | 178 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 D | slagtf.f | 178 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 D | dlagtf.f | 178 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 D | slagtf.f | 106 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 D | dlagtf.f | 106 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 D | slagtf.f | 178 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 D | dlagtf.f | 178 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 D | dlagtf.f | 178 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 D | slagtf.f | 178 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 D | dlagtf.f | 106 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 D | slagtf.f | 106 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 D | dlagtf.f | 181 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 D | slagtf.f | 181 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 D | slagtf.f | 181 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 D | dlagtf.f | 181 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 D | dlagtf.f | 181 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 D | dlagtf.f | 181 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 D | slagtf.f | 181 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 D | dlagtf.f | 178 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 D | slagtf.f | 178 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 D | dbesyn.f | 62 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 D | sbesyn.f | 62 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
|