/dports/math/reduce/Reduce-svn5758-src/packages/regressions/ |
H A D | 2015-06-13-improved-handling-of-repart-impart.rlg | 2 repart(log(5)); 18 repart(log(2+3i)); 52 repart(log(5)); 62 repart(log(-5)); 72 repart(log(5i)); 84 repart(log(-5i)); 96 repart(log(x)); 122 repart(log(y)); 149 repart(log(5)); 193 repart(log(x)); [all …]
|
H A D | 2015-06-13-improved-handling-of-repart-impart.tst | 2 repart(log(5)); 6 repart(log(2+3i)); 16 repart(log(5)); 18 repart(log(-5)); 20 repart(log(5i)); 22 repart(log(-5i)); 24 repart(log(x)); 28 repart(log(y)); 33 repart(log(5)); 41 repart(log(x)); [all …]
|
H A D | 2015-08-21-repart-impart.tst | 2 % Testing repart/impart 4 repart exp x; 6 repart(5^x); 8 repart(i^i); 11 {repart sqrt(3+4i), impart sqrt(3+4i)}; 24 repart sinh x; 26 repart cosh x; 29 repart tanh(u+i*v); 31 repart asech(2+i); 34 repart asin(u+i*v); [all …]
|
H A D | 2015-08-21-repart-impart.rlg | 2 % Testing repart/impart 4 repart exp x; 7 repart(x) 11 repart(5^x); 14 repart(x) 18 repart(i^i); 109 repart sinh x; 119 repart cosh x; 130 repart tanh(u+i*v); 146 repart asech(2+i); [all …]
|
H A D | 2015-01-29-repart-impart-abs-sign.rlg | 2 % Testing repart/impart 4 repart exp x; 7 repart(x) 17 repart sinh x; 20 cos(impart(x))*sinh(repart(x)) 25 cosh(repart(x))*sin(impart(x)) 27 repart cosh x; 30 cos(impart(x))*cosh(repart(x)) 35 sin(impart(x))*sinh(repart(x))
|
H A D | 2015-08-21-trig-short.tst | 22 {repart log(x+i*y), impart log(x+i*y)}; 23 {repart log(x^2+i*y^2), impart log(x^2+i*y^2)}; 24 {repart log(-1), impart log(-1)}; 25 {repart log(i), impart log i, impart log(-i)}; 26 {repart log(1+i), impart log(1+i), repart log(-1-i), impart log(-1-i)};
|
H A D | 2015-01-29-repart-impart-abs-sign.tst | 2 % Testing repart/impart 4 repart exp x; 8 repart sinh x; 10 repart cosh x;
|
H A D | 2015-08-21-trig-short.rlg | 94 {repart log(x+i*y), impart log(x+i*y)}; 102 {repart log(x^2+i*y^2), impart log(x^2+i*y^2)}; 111 {repart log(-1), impart log(-1)}; 116 {repart log(i), impart log i, impart log(-i)}; 123 {repart log(1+i), impart log(1+i), repart log(-1-i), impart log(-1-i)};
|
H A D | 2015-03-21-trig-short.tst | 138 {repart log(x+i*y), impart log(x+i*y)}; 139 {repart log(x^2+i*y^2), impart log(x^2+i*y^2)}; 140 {repart log(-1), impart log(-1)}; 141 {repart log(i), impart log i, impart log(-i)}; 142 {repart log(1+i), impart log(1+i), repart log(-1-i), impart log(-1-i)};
|
/dports/math/reduce/Reduce-svn5758-src/packages/specfn/ |
H A D | fps.rlg | 571 - 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 576 impart(mmm) + repart(nnn) 579 - 2*impart(mmm)*repart(nnn) + impart(nnn) 582 + 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 587 impart(mmm) - repart(nnn) 590 - 2*impart(mmm)*repart(nnn) + impart(nnn) 593 + 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 598 impart(mmm) - repart(nnn) 604 - 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 607 impart(nnn) - repart(mmm) [all …]
|
H A D | sfellipi.red | 91 shift := fix repart(2*k/d); 95 when ((ratnump(rp) and abs(rp) >= 1) where rp => repart(2*k/d)), 105 and numberp repart m and numberp impart m 129 when lisp !*rounded and numberp repart m and numberp impart m, 139 when lisp !*rounded and numberp repart m and numberp impart m 202 shift := fix repart(2*k/d); 216 and numberp repart m and numberp impart m 268 shift := fix repart(k/d); 273 when ((ratnump(rp) and abs(rp) >= 2) where rp => repart(k/d)), 314 and numberp repart m and numberp impart m, [all …]
|
H A D | sfkummer.red | 56 and not(z=0 and repart(1-b) < 0) 57 and ((a-b) neq floor repart (a-b) or (a-b) > -1), 62 and not(z=0 and repart(1-b) < 0) 79 and a = 1 and b = 2 and repart z = 0 and z neq 0, 91 and not (repart b = floor repart b 92 and repart a = floor repart a 93 and repart a < 0 and repart b < 0 94 and repart a >= repart b),
|
H A D | sftheta.red | 92 nt := fix repart tau; 139 if repart q < 0 then << % i.e. 1/2 < |repart tau| <1 161 % |repart tau| is now <1 228 if repart q < 0 then << 251 % |repart tau| is now < 1 321 if repart q >= 0 then << 350 % |repart tau| is now < 1 422 if repart q >= 0 then << 451 % |repart tau| is now < 1 657 n := fix(repart(k/d)); [all …]
|
H A D | sfellip.red | 212 shift := fix repart(k/d); 265 when lisp !*rounded and numberp repart u and numberp repart m 301 shift := fix repart(k/d); 415 shift := fix repart(k/d); 514 shift := fix repart(k/d); 616 shift := fix repart(k/d); 712 shift := fix repart(k/d); 800 shift := fix repart(k/d); 892 shift := fix repart(k/d); 986 shift := fix repart(k/d); [all …]
|
H A D | sfweier.red | 75 m := fix repart(k/(2*d)); 84 m := fix repart(k/(2*d)); 93 m := fix repart(k/(2*d)); 102 m := fix repart(k/(2*d)); 111 m := fix repart(k/(2*d)); 121 m := fix repart(k/(2*d)); 131 m := fix repart(k/(2*d)); 140 m := fix repart(k/(2*d)); 184 m := fix repart(k/(2*d)); 649 m := round repart tau; [all …]
|
/dports/math/reduce/Reduce-svn5758-src/xmpl/ |
H A D | fps.rlg | 571 - 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 576 impart(mmm) + repart(nnn) 579 - 2*impart(mmm)*repart(nnn) + impart(nnn) 582 + 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 587 impart(mmm) - repart(nnn) 590 - 2*impart(mmm)*repart(nnn) + impart(nnn) 593 + 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 598 impart(mmm) - repart(nnn) 604 - 2*impart(nnn)*repart(mmm) + repart(mmm) + repart(nnn) )**--- 607 impart(nnn) - repart(mmm) [all …]
|
/dports/math/reduce/Reduce-svn5758-src/packages/misc/trigd/ |
H A D | trigd.red | 292 => -sind(w/d + k/d-sign(repart(k/d))*180) 296 => -cosd(w/d + k/d-sign(repart(k/d))*180) 300 => tand(w/d + k/d-sign(repart(k/d))*180) 304 => cotd(w/d + k/d-sign(repart(k/d))*180) 309 => -secd(w/d + k/d-sign(repart(k/d))*180) 324 when abs repart(k/d) = 90, 327 when abs repart(k/d) = 90, 331 when abs repart(k/d) = 90, 334 when abs repart(k/d) = 90, 337 when abs repart(k/d) = 90, [all …]
|
/dports/math/reduce/Reduce-svn5758-src/packages/defint/ |
H A D | definti.red | 58 and mylessp(abs(atan2(impart eta,repart eta)),delta) = 't 66 and mylessp(abs(atan2(impart eta,repart eta)),delta) = 't 73 and mylessp(abs(atan2(impart eta,repart eta)),delta) = 't 106 and arg_test3a(atan2(impart eta,repart eta),0) = 't 121 and arg_test(atan2(impart eta,repart eta),delta) = 't 129 and arg_test3(atan2(impart eta,repart eta),delta) = 't 138 and arg_test3a(atan2(impart eta,repart eta),delta) = 't 152 and arg_test4(atan2(impart eta,repart eta),delta) = 't 194 and arg_test(atan2(impart eta,repart eta),delta) = 't 212 and arg_test8(atan2(impart eta,repart eta),delta) = 't [all …]
|
H A D | defintf.red | 118 and mylessp(abs(atan2(impart omega,repart omega)),m + n - p + 1) 140 and mylessp(abs(atan2(impart omega,repart omega)),m + n - q + 1) 162 and test_arg(abs(atan2(impart omega,repart omega)), 185 and test_arg(abs(atan2(impart omega,repart omega)), 208 and test_arg(abs(atan2(impart omega,repart omega)), 232 and test_arg(abs(atan2(impart omega,repart omega)), 255 and mylessp(abs(atan2(impart sigma,repart sigma)),k + l - u + 1) 299 and test_arg(abs(atan2(impart sigma,repart sigma)), 322 and test_arg(abs(atan2(impart sigma,repart sigma)), 345 and test_arg(abs(atan2(impart sigma,repart sigma)), [all …]
|
H A D | definta.red | 690 << s := algebraic(repart(1 + u)); 783 (list 'min (list 'repart 'bj))) (list 'repart 's)) 808 << s := algebraic(repart(1 + s)); 826 diff_sum := reval algebraic(repart(sum_a - sum_b)); 1235 (list 'repart (list 'plus 'alpha 'dj))) 1288 (list 'times (list 'difference 'u 'v) (list 'repart 1394 (list 'times 2 (list 'repart (list 'plus 1450 (list 'times 2 (list 'repart (list 'plus 1713 (list 'and (list 'lessp (list 'repart (list 'plus 1792 arg_omega := atan2(impart omega,repart omega); [all …]
|
/dports/math/amgcl/amgcl-1.4.2/amgcl/mpi/ |
H A D | amg.hpp | 74 repart_params repart; ///< Repartition parameters. member 121 AMGCL_PARAMS_IMPORT_CHILD(p, repart), in params() 143 AMGCL_PARAMS_EXPORT_CHILD(p, path, repart); in get() 161 ) : prm(prm), repart(prm.repart) in amg() 171 ) : prm(prm), repart(prm.repart) in amg() 241 std::shared_ptr<matrix> step_down(Coarsening &C, const Repartition &repart) in step_down() 262 if (repart.is_needed(*Ac)) { in step_down() 264 auto I = repart(*Ac, block_size(C)); in step_down() 296 Repartition repart; member in amgcl::mpi::amg 315 A = levels.back().step_down(C, repart); in init()
|
/dports/math/reduce/Reduce-svn5758-src/packages/ratint/ |
H A D | convert.red | 53 %repart(x)=x, 56 %when repart(x)=x, 59 %repart(x)=x and repart(y)=y, 62 % repart(x)=x and repart(y)=y, 63 log(~x/~y) => log(x)-log(y), %when repart(y)=y, 68 log(-~x) => i*pi+log(x), % when repart(x)=x and numberp x and x>0, 70 %when repart(x)=x and numberp x and x>0, 71 log(i*~x) => i*pi/2 +log(x) %when repart(x)=x and numberp x and x>0 151 re:=algebraic repart(exp); 164 algebraic repart(var):=var; algebraic impart(var):=0;
|
/dports/net-mgmt/ocsinventory-ocsreports/ocsinventory-ocsreports/require/ |
H A D | function_console.php | 149 $repart = array("OCS_REPORT_WORKGROUP" => "ELSE", variable 255 global $repart; 261 unset($repart[$key]); 265 foreach ($repart as $key => $value) { 287 global $repart, $lbl_field; 288 foreach ($repart as $key => $value) {
|
/dports/math/reduce/Reduce-svn5758-src/packages/plot/ |
H A D | riemann.tst | 19 x:=repart(z); y:=impart(z); 31 x:=repart(z); y:=impart(z); 43 x:=repart(z); y:=impart(z); 57 x:=repart(z); y:=impart(z); 81 x:=repart(z); y:=impart(z);
|
/dports/math/reduce/Reduce-svn5758-src/packages/alg/ |
H A D | elem.red | 362 => (if evenp fix repart(k/d) then 1 else -1) 363 * sin(w/d + ((k/d)-fix repart(k/d))*pi) 370 => (if evenp fix repart(k/d) then 1 else -1) 371 * cos(w/d + ((k/d)-fix repart(k/d))*pi) 395 => tan(w/d + ((k/d)-fix repart(k/d))*pi) 399 => cot(w/d + ((k/d)-fix repart(k/d))*pi) 411 when abs repart(k/d) = 1/2, 414 when abs repart(k/d) = 1/2, 417 when abs repart(k/d) = 1/2, 420 when abs repart(k/d) = 1/2, [all …]
|