Home
last modified time | relevance | path

Searched refs:AREA12 (Results 1 – 25 of 39) sorted by relevance

12

/dports/math/cmlib/cmlib-3.0_8/src/quadpkd/
H A Ddqawce.f142 DOUBLE PRECISION A,AA,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,
264 AREA12 = AREA1+AREA2
267 AREA = AREA+AREA12-RLIST(MAXERR)
268 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1D-04*ABS(AREA12)
H A Ddqawse.f164 DOUBLE PRECISION A,ABSERR,ALFA,ALIST,AREA,AREA1,AREA12,AREA2,A1,
301 AREA12 = AREA1+AREA2
304 AREA = AREA+AREA12-RLIST(MAXERR)
310 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1D-04*ABS(AREA12)
H A Ddqage.f149 DOUBLE PRECISION A,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B,
276 AREA12 = AREA1+AREA2
279 AREA = AREA+AREA12-RLIST(MAXERR)
281 IF(ABS(RLIST(MAXERR)-AREA12).LE.0.1D-04*ABS(AREA12)
H A Ddqagse.f151 DOUBLE PRECISION A,ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
297 AREA12 = AREA1+AREA2
300 AREA = AREA+AREA12-RLIST(MAXERR)
302 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*ABS(AREA12)
H A Ddqagie.f153 DOUBLE PRECISION ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
309 AREA12 = AREA1+AREA2
312 AREA = AREA+AREA12-RLIST(MAXERR)
314 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*ABS(AREA12)
/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/
H A Ddqawce.f151 DOUBLE PRECISION A,AA,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2, local
273 AREA12 = AREA1+AREA2
276 AREA = AREA+AREA12-RLIST(MAXERR)
277 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1D-04*ABS(AREA12)
H A Ddqawse.f173 DOUBLE PRECISION A,ABSERR,ALFA,ALIST,AREA,AREA1,AREA12,AREA2,A1, local
310 AREA12 = AREA1+AREA2
313 AREA = AREA+AREA12-RLIST(MAXERR)
319 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1D-04*ABS(AREA12)
H A Ddqage.f159 DOUBLE PRECISION A,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B, local
286 AREA12 = AREA1+AREA2
289 AREA = AREA+AREA12-RLIST(MAXERR)
291 IF(ABS(RLIST(MAXERR)-AREA12).LE.0.1D-04*ABS(AREA12)
H A Ddqagse.f160 DOUBLE PRECISION A,ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1, local
306 AREA12 = AREA1+AREA2
309 AREA = AREA+AREA12-RLIST(MAXERR)
311 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*ABS(AREA12)
H A Ddqagie.f161 DOUBLE PRECISION ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1, local
317 AREA12 = AREA1+AREA2
320 AREA = AREA+AREA12-RLIST(MAXERR)
322 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*ABS(AREA12)
/dports/math/slatec/src/
H A Ddqawce.f151 DOUBLE PRECISION A,AA,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,
273 AREA12 = AREA1+AREA2
276 AREA = AREA+AREA12-RLIST(MAXERR)
277 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1D-04*ABS(AREA12)
H A Dqawce.f151 REAL A,AA,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B,BB,BLIST,
273 AREA12 = AREA1+AREA2
276 AREA = AREA+AREA12-RLIST(MAXERR)
277 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1E-04*ABS(AREA12)
H A Ddqawse.f173 DOUBLE PRECISION A,ABSERR,ALFA,ALIST,AREA,AREA1,AREA12,AREA2,A1,
310 AREA12 = AREA1+AREA2
313 AREA = AREA+AREA12-RLIST(MAXERR)
319 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1D-04*ABS(AREA12)
H A Dqawse.f173 REAL A,ABSERR,ALFA,ALIST,AREA,AREA1,AREA12,
312 AREA12 = AREA1+AREA2
315 AREA = AREA+AREA12-RLIST(MAXERR)
321 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1E-04*ABS(AREA12)
H A Dqage.f158 REAL A,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B,BLIST,
286 AREA12 = AREA1+AREA2
289 AREA = AREA+AREA12-RLIST(MAXERR)
291 IF(ABS(RLIST(MAXERR)-AREA12).LE.0.1E-04*ABS(AREA12)
H A Ddqage.f159 DOUBLE PRECISION A,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B,
286 AREA12 = AREA1+AREA2
289 AREA = AREA+AREA12-RLIST(MAXERR)
291 IF(ABS(RLIST(MAXERR)-AREA12).LE.0.1D-04*ABS(AREA12)
H A Ddqagse.f160 DOUBLE PRECISION A,ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
306 AREA12 = AREA1+AREA2
309 AREA = AREA+AREA12-RLIST(MAXERR)
311 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*ABS(AREA12)
H A Ddqagie.f161 DOUBLE PRECISION ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
317 AREA12 = AREA1+AREA2
320 AREA = AREA+AREA12-RLIST(MAXERR)
322 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*ABS(AREA12)
H A Dqagie.f162 REAL ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
320 AREA12 = AREA1+AREA2
323 AREA = AREA+AREA12-RLIST(MAXERR)
325 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1E-04*ABS(AREA12)
/dports/math/cmlib/cmlib-3.0_8/src/quadpks/
H A Dqawce.f140 REAL A,AA,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B,BB,BLIST,
262 AREA12 = AREA1+AREA2
265 AREA = AREA+AREA12-RLIST(MAXERR)
266 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1E-04*ABS(AREA12)
H A Dqawse.f162 REAL A,ABSERR,ALFA,ALIST,AREA,AREA1,AREA12,
301 AREA12 = AREA1+AREA2
304 AREA = AREA+AREA12-RLIST(MAXERR)
310 IF(ABS(RLIST(MAXERR)-AREA12).LT.0.1E-04*ABS(AREA12)
H A Dqage.f147 REAL A,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,A2,B,BLIST,
275 AREA12 = AREA1+AREA2
278 AREA = AREA+AREA12-RLIST(MAXERR)
280 IF(ABS(RLIST(MAXERR)-AREA12).LE.0.1E-04*ABS(AREA12)
H A Dqagie.f151 REAL ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
309 AREA12 = AREA1+AREA2
312 AREA = AREA+AREA12-RLIST(MAXERR)
314 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1E-04*ABS(AREA12)
H A Dqagse.f149 REAL A,ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1,
296 AREA12 = AREA1+AREA2
299 AREA = AREA+AREA12-RLIST(MAXERR)
301 IF(ABS(RLIST(MAXERR)-AREA12).GT.0.1E-04*ABS(AREA12)
/dports/math/octave/octave-6.4.0/liboctave/external/quadpack/
H A Ddqagie.f152 DOUBLE PRECISION ABSEPS,ABSERR,ALIST,AREA,AREA1,AREA12,AREA2,A1, local
311 AREA12 = AREA1+AREA2
314 AREA = AREA+AREA12-RLIST(MAXERR)
316 IF(DABS(RLIST(MAXERR)-AREA12).GT.0.1D-04*DABS(AREA12)

12