Searched refs:BILNMX (Results 1 – 6 of 6) sorted by relevance
/dports/math/cmlib/cmlib-3.0_8/src/fnlib/ |
H A D | dbinom.f | 20 REAL BILNMX 22 DATA BILNMX, FINTMX / 0.0, 0.0D0 / 24 IF (BILNMX.NE.0.0) GO TO 10 25 BILNMX = DLOG(D1MACH(2)) - 0.0001D0 34 IF (FLOAT(K)*ALOG(AMAX0(N,1)).GT.BILNMX) GO TO 30 59 IF (DBINOM.GT.DBLE(BILNMX)) CALL XERROR ( 'DBINOM RESULT OVERFLOW
|
H A D | binom.f | 16 DATA BILNMX, FINTMX / 0.0, 0.0 / 18 IF (BILNMX.NE.0.0) GO TO 10 19 BILNMX = ALOG (R1MACH(2)) 28 IF (FLOAT(K)*ALOG(AMAX0(N,1)).GT.BILNMX) GO TO 30 52 IF (BINOM.GT.BILNMX) CALL XERROR ( 'BINOM RESULT OVERFLOWS BECAU
|
/dports/math/slatec/src/ |
H A D | dbinom.f | 25 1 DLNREL, D1MACH, BILNMX 27 SAVE SQ2PIL, BILNMX, FINTMX, FIRST 32 BILNMX = LOG(D1MACH(2)) - 0.0001D0 43 IF (K*LOG(AMAX0(N,1)).GT.BILNMX) GO TO 30 68 IF (DBINOM .GT. BILNMX) CALL XERMSG ('SLATEC', 'DBINOM',
|
H A D | binom.f | 26 SAVE SQ2PIL, BILNMX, FINTMX, FIRST 31 BILNMX = LOG (R1MACH(2)) 42 IF (K*LOG(AMAX0(N,1)).GT.BILNMX) GO TO 30 66 IF (BINOM .GT. BILNMX) CALL XERMSG ('SLATEC', 'BINOM',
|
/dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/ |
H A D | dp6.F | 1676 REAL BILNMX local 1681 DATA BILNMX, FINTMX / 0.0, 0.0D0 / 1686 IF (BILNMX.NE.0.0) GO TO 10 1687 BILNMX = DLOG(D1MACH(2)) - 0.0001D0 1707 IF (FLOAT(K)*LOG(AMAX0(N,1)).GT.BILNMX) GO TO 30 1738 IF (DBINOM.GT.DBLE(BILNMX)) THEN 1779 REAL BILNMX local 1785 DATA BILNMX, FINTMX / 0.0, 0.0D0 / 1790 IF (BILNMX.NE.0.0) GO TO 10 1791 BILNMX = DLOG(D1MACH(2)) - 0.0001D0 [all …]
|
H A D | dp3.F | 24630 DATA BILNMX, FINTMX / 0.0, 0.0 / 24635 IF (BILNMX.NE.0.0) GO TO 10 24636 BILNMX = LOG (R1MACH(2)) 24662 IF (FLOAT(K)*LOG(AMAX0(N,1)).GT.BILNMX) GO TO 30 24693 IF (BINOM.GT.BILNMX) THEN
|