/dports/math/cmlib/cmlib-3.0_8/src/pchips/ |
H A D | pchcs.f | 102 REAL DEL(3), DEXT, DFLOC, DFMX, FACT, FUDGE, ONE, SLMAX, 141 DEXT = PCHSD (SLOPE(I-1), SLOPE(I), H(I-1), H(I)) 145 IF ( PCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 153 WTAVE(2) = DEXT 163 WTAVE(1) = DEXT
|
/dports/math/cmlib/cmlib-3.0_8/src/pchipd/ |
H A D | dpchcs.f | 103 DOUBLE PRECISION DEL(3), DEXT, DFLOC, DFMX, FACT, FUDGE, ONE, 142 DEXT = DPCHSD (SLOPE(I-1), SLOPE(I), H(I-1), H(I)) 146 IF ( DPCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 154 WTAVE(2) = DEXT 164 WTAVE(1) = DEXT
|
/dports/math/PDL/PDL-2.019/Lib/Slatec/slatec/ |
H A D | dpchcs.f | 101 DOUBLE PRECISION DEL(3), DEXT, DFLOC, DFMX, FACT, FUDGE, ONE, 141 DEXT = DPCHSD (SLOPE(I-1), SLOPE(I), H(I-1), H(I)) 145 IF ( DPCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 153 WTAVE(2) = DEXT 163 WTAVE(1) = DEXT
|
H A D | pchcs.f | 99 REAL DEL(3), DEXT, DFLOC, DFMX, FACT, FUDGE, ONE, SLMAX, 139 DEXT = PCHSD (SLOPE(I-1), SLOPE(I), H(I-1), H(I)) 143 IF ( PCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 151 WTAVE(2) = DEXT 161 WTAVE(1) = DEXT
|
/dports/math/slatec/src/ |
H A D | dpchcs.f | 101 DOUBLE PRECISION DEL(3), DEXT, DFLOC, DFMX, FACT, FUDGE, ONE, 141 DEXT = DPCHSD (SLOPE(I-1), SLOPE(I), H(I-1), H(I)) 145 IF ( DPCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 153 WTAVE(2) = DEXT 163 WTAVE(1) = DEXT
|
H A D | pchcs.f | 99 REAL DEL(3), DEXT, DFLOC, DFMX, FACT, FUDGE, ONE, SLMAX, 139 DEXT = PCHSD (SLOPE(I-1), SLOPE(I), H(I-1), H(I)) 143 IF ( PCHST(DEXT, SLOPE(I-1)) ) 200, 900, 250 151 WTAVE(2) = DEXT 161 WTAVE(1) = DEXT
|
/dports/sysutils/isc-cron/isc-cron-4.1_2/ |
H A D | macros.h | 58 #define DEXT 0x0001 /* extend flag for other debug masks */ 90 #define Set_LineNum(ln) {Debug(DPARS|DEXT,("linenum=%d\n",ln)); \
|
H A D | entry.c | 410 Debug(DPARS|DEXT, ("get_list()...entered\n")) in get_list() 436 Debug(DPARS|DEXT, ("get_list()...exiting w/ %02x\n", ch)) in get_list() 451 Debug(DPARS|DEXT, ("get_range()...entering, exit won't show\n")) in get_range() 562 Debug(DPARS|DEXT, in get_number() 580 Debug(DPARS|DEXT, ("set_element(?,%d,%d,%d)\n", low, high, number)) in set_element()
|
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | ana_orderings.F | 810 DEXT = W (E) - WFLG 812 DEG = DEG + DEXT 1912 DEXT = W (E) - WFLG 1914 DEG = DEG + DEXT 3206 DEG = DEG + DEXT 4638 WF(E) = DEXT * ( (2 * DEGREE(E)) - DEXT - 1) 4641 DEG = DEG + DEXT 6161 DEG = DEG + DEXT 7671 WF(E) = DEXT * ( (2 * DEGREE(E)) - DEXT - 1) 7674 DEG = DEG + DEXT [all …]
|
/dports/math/jags/JAGS-4.3.0/src/modules/glm/SSparse/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-csparse/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, local 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-klu/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-btf/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, local 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-amd/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-ldl/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-slip_lu/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-mongoose/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-rbio/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, local 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-colamd/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-config/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-ccolamd/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-cholmod/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/deal.ii/dealii-803d21ff957e349b3799cd3ef2c840bc78734305/bundled/umfpack/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-umfpack/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|
/dports/math/suitesparse-spqr/SuiteSparse-5.10.1/AMD/Source/ |
H A D | amd.f | 335 INTEGER DEG, DEGME, DEXT, DMAX, E, ELENME, ELN, HASH, HMOD, I, 810 DEXT = W (E) - WFLG 811 IF (DEXT .GT. 0) THEN 812 DEG = DEG + DEXT 816 ELSE IF (DEXT .EQ. 0) THEN
|