Searched refs:deg_poly (Results 1 – 9 of 9) sorted by relevance
/dports/math/octave-forge-interval/interval-3.2.0/src/crlibm/scs_lib/maple/ |
H A D | SCSS_procedures.mws | 53 \n local i, deg_poly;\n\n deg_poly := degree(poly);\n for i from deg_p 54 oly by -1 while i>=0 do\n if coeff(poly, x, i)=0 then\n deg_poly := 55 deg_poly-1;\n end if;\n end do;\n\n return deg_poly;\nend proc:" }}
|
/dports/math/m4rie/m4rie-release-20200115/src/ |
H A D | blm.c | 115 deg_t deg_poly = 1; in crt_init() local 122 p[deg_poly] = irreducible_polynomials[deg_poly][0]; in crt_init() 123 if (deg_have + deg_poly * p[deg_poly] < deg_need) { in crt_init() 124 deg_have += deg_poly * p[deg_poly]; in crt_init() 127 p[deg_poly] = ceil(deg_diff/(double)deg_poly); in crt_init() 128 deg_have += deg_poly * p[deg_poly]; in crt_init() 130 deg_poly ++; in crt_init()
|
/dports/math/reduce/Reduce-svn5758-src/libraries/crlibm/maple/ |
H A D | atan.mpl | 83 deg_poly := 4: 273 fprintf(fd, "#define DEGREE %d\n", deg_poly): 274 fprintf(fd, "static double const coef_poly[%d] = \n{\n",deg_poly): 276 for i from deg_poly-1 to 0 by -1 do
|
H A D | common-procedures.mpl | 978 local i, deg_poly: 980 deg_poly := degree(poly): 981 for i from deg_poly by -1 while i>=0 do 983 deg_poly := deg_poly-1: 987 return deg_poly:
|
/dports/math/crlibm/crlibm-1.0beta4/maple/ |
H A D | atan.mpl | 83 deg_poly := 4: 273 fprintf(fd, "#define DEGREE %d\n", deg_poly): 274 fprintf(fd, "static double const coef_poly[%d] = \n{\n",deg_poly): 276 for i from deg_poly-1 to 0 by -1 do
|
H A D | common-procedures.mpl | 978 local i, deg_poly: 980 deg_poly := degree(poly): 981 for i from deg_poly by -1 while i>=0 do 983 deg_poly := deg_poly-1: 987 return deg_poly:
|
/dports/math/octave-forge-interval/interval-3.2.0/src/crlibm/maple/ |
H A D | atan.mpl | 105 deg_poly := 4: 295 fprintf(fd, "#define DEGREE %d\n", deg_poly): 296 fprintf(fd, "static double const coef_poly[%d] = \n{\n",deg_poly): 298 for i from deg_poly-1 to 0 by -1 do
|
H A D | common-procedures.mpl | 999 local i, deg_poly: 1001 deg_poly := degree(poly): 1002 for i from deg_poly by -1 while i>=0 do 1004 deg_poly := deg_poly-1: 1008 return deg_poly:
|
/dports/math/maxima/maxima-5.43.2/share/solve_rec/ |
H A D | solve_rec.mac | 694 d : length(coeffs), j, deg_poly : 0, i, sol, deg, %x, gen_p, %u, eqn, 699 deg_poly : coeff(coeffs[1], %n, m-s) + 705 deg_poly : ratsimp(deg_poly), 706 if deg_poly#0 then return(true) 708 sol : solve(deg_poly, %x),
|