/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
H A D | dbesy0.f | 32 DOUBLE PRECISION X, BY0CS(19), AMPL, THETA, TWODPI, XSML, local 35 SAVE BY0CS, TWODPI, NTY0, XSML, FIRST 36 DATA BY0CS( 1) / -.1127783939 2865573217 9398054602 8 D-1 / 37 DATA BY0CS( 2) / -.1283452375 6042034604 8088453183 8 D+0 / 38 DATA BY0CS( 3) / -.1043788479 9794249365 8176227661 8 D+0 / 39 DATA BY0CS( 4) / +.2366274918 3969695409 2415926461 3 D-1 / 40 DATA BY0CS( 5) / -.2090391647 7004862391 9622395034 2 D-2 / 41 DATA BY0CS( 6) / +.1039754539 3905725209 9924657638 1 D-3 / 42 DATA BY0CS( 7) / -.3369747162 4239720967 1877534503 7 D-5 / 59 NTY0 = INITDS (BY0CS, 19, 0.1*REAL(D1MACH(3))) [all …]
|
/dports/math/slatec/src/ |
H A D | dbesy0.f | 32 DOUBLE PRECISION X, BY0CS(19), AMPL, THETA, TWODPI, XSML, 35 SAVE BY0CS, TWODPI, NTY0, XSML, FIRST 36 DATA BY0CS( 1) / -.1127783939 2865573217 9398054602 8 D-1 / 37 DATA BY0CS( 2) / -.1283452375 6042034604 8088453183 8 D+0 / 38 DATA BY0CS( 3) / -.1043788479 9794249365 8176227661 8 D+0 / 39 DATA BY0CS( 4) / +.2366274918 3969695409 2415926461 3 D-1 / 40 DATA BY0CS( 5) / -.2090391647 7004862391 9622395034 2 D-2 / 41 DATA BY0CS( 6) / +.1039754539 3905725209 9924657638 1 D-3 / 42 DATA BY0CS( 7) / -.3369747162 4239720967 1877534503 7 D-5 / 59 NTY0 = INITDS (BY0CS, 19, 0.1*REAL(D1MACH(3))) [all …]
|
H A D | besy0.f | 46 DIMENSION BY0CS(13), BM0CS(21), BTH0CS(24) 48 SAVE BY0CS, BM0CS, BTH0CS, TWODPI, PI4, 50 DATA BY0CS( 1) / -.0112778393 92865573E0 / 51 DATA BY0CS( 2) / -.1283452375 6042035E0 / 52 DATA BY0CS( 3) / -.1043788479 9794249E0 / 53 DATA BY0CS( 4) / .0236627491 83969695E0 / 54 DATA BY0CS( 5) / -.0020903916 47700486E0 / 55 DATA BY0CS( 6) / .0001039754 53939057E0 / 56 DATA BY0CS( 7) / -.0000033697 47162423E0 / 113 NTY0 = INITS (BY0CS, 13, 0.1*R1MACH(3)) [all …]
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
H A D | dbesy0.f | 32 DOUBLE PRECISION X, BY0CS(19), AMPL, THETA, TWODPI, XSML, local 35 SAVE BY0CS, TWODPI, NTY0, XSML, FIRST 36 DATA BY0CS( 1) / -.1127783939 2865573217 9398054602 8 D-1 / 37 DATA BY0CS( 2) / -.1283452375 6042034604 8088453183 8 D+0 / 38 DATA BY0CS( 3) / -.1043788479 9794249365 8176227661 8 D+0 / 39 DATA BY0CS( 4) / +.2366274918 3969695409 2415926461 3 D-1 / 40 DATA BY0CS( 5) / -.2090391647 7004862391 9622395034 2 D-2 / 41 DATA BY0CS( 6) / +.1039754539 3905725209 9924657638 1 D-3 / 42 DATA BY0CS( 7) / -.3369747162 4239720967 1877534503 7 D-5 / 59 NTY0 = INITDS (BY0CS, 19, 0.1*REAL(D1MACH(3))) [all …]
|
/dports/math/math77/MATH77/ |
H A D | dbesy0.f | 18 DOUBLE PRECISION X, BY0CS(19), AMPL, THETA, TWODPI, XSML, local 29 DATA BY0CS / -.1127783939286557321793980546028D-1, 53 call DINITS (BY0CS, 19, 0.1D0*D1MACH(3), NTY0) 67 * DCSEVL (.125D0*Y-1.D0, BY0CS, NTY0)
|
H A D | sbesy0.f | 18 REAL X, BY0CS(19), AMPL, THETA, TWODPI, XSML, local 29 DATA BY0CS / -.1127783939286557321793980546028E-1, 53 call SINITS (BY0CS, 19, 0.1E0*R1MACH(3), NTY0) 67 * SCSEVL (.125E0*Y-1.E0, BY0CS, NTY0)
|
/dports/math/cmlib/cmlib-3.0_8/src/fnlib/ |
H A D | dbesy0.f | 24 DOUBLE PRECISION X, BY0CS(19), AMPL, THETA, TWODPI, XSML, 49 NTY0 = INITDS (BY0CS, 19, 0.1*SNGL(D1MACH(3))) 59 1 .125D0*Y-1.D0, BY0CS, NTY0)
|
H A D | besy0.f | 35 DIMENSION BY0CS(13), BM0CS(21), BTH0CS(24) 99 NTY0 = INITS (BY0CS, 13, 0.1*R1MACH(3)) 113 1 BY0CS, NTY0)
|
/dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/ |
H A D | dp3.F | 16108 DIMENSION BY0CS(13), BM0CS(21), BTH0CS(24) 16110 SAVE BY0CS, BM0CS, BTH0CS, TWODPI, PI4, 16112 DATA BY0CS( 1) / -.0112778393 92865573E0 / 16113 DATA BY0CS( 2) / -.1283452375 6042035E0 / 16114 DATA BY0CS( 3) / -.1043788479 9794249E0 / 16115 DATA BY0CS( 4) / .0236627491 83969695E0 / 16116 DATA BY0CS( 5) / -.0020903916 47700486E0 / 16117 DATA BY0CS( 6) / .0001039754 53939057E0 / 16118 DATA BY0CS( 7) / -.0000033697 47162423E0 / 16178 NTY0 = INITS (BY0CS, 13, 0.1*R1MACH(3)) [all …]
|