| /dports/math/cln/cln-1.3.6/src/integer/2adic/ |
| H A D | cl_I_2adic_recip.cc | 22 var const uintD* x_LSDptr; in cl_recip2adic() local
25 x_LSDptr = BN_LSDptr(x); in cl_recip2adic()
29 I_to_DS_n(x,x_len,x_LSDptr=); in cl_recip2adic()
30 x_LSDptr = x_LSDptr mspop x_len; in cl_recip2adic()
35 recip2adic(len,x_LSDptr,y_LSDptr); in cl_recip2adic()
|
| H A D | cl_I_2adic_div.cc | 22 var const uintD* x_LSDptr; in cl_div2adic() local
26 x_LSDptr = BN_LSDptr(x); in cl_div2adic()
30 I_to_DS_n(x,x_len,x_LSDptr=); in cl_div2adic()
31 x_LSDptr = x_LSDptr mspop x_len; in cl_div2adic()
45 div2adic(len,x_LSDptr,y_LSDptr,z_LSDptr); in cl_div2adic()
|
| /dports/math/cln/cln-1.3.6/src/integer/algebraic/ |
| H A D | cl_I_sqrtp.cc | 55 var const uintD* x_LSDptr; in sqrtp() local
56 I_to_NDS_nocopy(x, x_MSDptr=,x_len=,x_LSDptr=, // Digit sequence >=0 zu x in sqrtp()
60 { var uintD lsd = lspref(x_LSDptr,0); in sqrtp()
82 UDS_sqrt(x_MSDptr,x_len,x_LSDptr, &y, squarep=); // Wurzel ziehen in sqrtp()
|
| H A D | cl_I_sqrt.cc | 33 var const uintD* x_LSDptr; in isqrt() local
34 I_to_NDS_nocopy(x, x_MSDptr=,x_len=,x_LSDptr=,true,); // Digit sequence >=0 zu x in isqrt()
37 UDS_sqrt(x_MSDptr,x_len,x_LSDptr, &y, squarep=); // Wurzel ziehen in isqrt()
|
| H A D | cl_I_rootp_aux.cc | 81 var const uintD* x_LSDptr; in cl_rootp_aux() local
96 I_to_NDS_nocopy(x, ,x_len=,x_LSDptr=,false,); // UDS zu x bilden, x_len>0 in cl_rootp_aux()
97 var uintD x_lsd = lspref(x_LSDptr,0); // letztes Digit von x in cl_rootp_aux()
166 sub_loop_lsp(x_LSDptr,free_LSDptr,zz_LSDptr,k2); // zz:=x-y^n in cl_rootp_aux()
|
| /dports/math/cln/cln-1.3.6/src/integer/bitwise/ |
| H A D | cl_I_ash.cc | 41 var const uintD* x_LSDptr; in ash() local
42 I_to_NDS_nocopy(x, ,len=,x_LSDptr=,false,); // DS zu x bilden. in ash()
47 {var uintD* MSDptr = copy_loop_lsp(x_LSDptr,LSDptr,len); in ash()
|
| H A D | cl_I_ash_I.cc | 86 var const uintD* x_LSDptr; in ash() local
87 I_to_NDS_nocopy(x, ,len=,x_LSDptr=,false,); // DS zu x bilden. in ash()
92 var uintD* MSDptr = copy_loop_lsp(x_LSDptr,LSDptr,len); in ash()
|
| /dports/math/cln/cln-1.3.6/src/integer/elem/ |
| H A D | cl_I_div.cc | 97 var const uintD* x_LSDptr; in cl_divide() local
102 BN_to_NDS_nocopy(x, x_MSDptr=,x_len=,x_LSDptr=); in cl_divide()
108 UDS_divide(x_MSDptr,x_len,x_LSDptr,y_MSDptr,y_len,y_LSDptr, &q,&r); in cl_divide()
|
| /dports/math/cln/cln-1.3.6/src/float/lfloat/elem/ |
| H A D | cl_LF_square.cc | 47 var const uintD* x_LSDptr = arrayLSDptr(TheLfloat(x)->data,len); in square() local
52 cl_UDS_mul_square(x_LSDptr,len,LSDptr); in square()
|
| /dports/lang/clisp/clisp-df3b9f6fdcff22832898e89a989eb499c0f842ed/src/ |
| H A D | intsqrt.d | 405 var uintD* x_LSDptr; in I_isqrt_I() local
406 I_to_NDS_nocopy(x, x_MSDptr=,x_len=,x_LSDptr=); # Digit sequence >=0 zu x in I_isqrt_I()
411 UDS_sqrt(x_MSDptr,x_len,x_LSDptr, &y, squarep=); # Wurzel ziehen in I_isqrt_I()
433 var uintD* x_LSDptr; in I_sqrtp() local
434 I_to_NDS_nocopy(x, x_MSDptr=,x_len=,x_LSDptr=); # Digit sequence >=0 zu x in I_sqrtp()
439 UDS_sqrt(x_MSDptr,x_len,x_LSDptr, &y, squarep=); # Wurzel ziehen in I_sqrtp()
539 var uintD* x_LSDptr; in I_rootp() local
540 I_to_NDS_nocopy(x, _EMA_,x_len=,x_LSDptr=); # UDS zu x bilden, x_len>0 in I_rootp()
541 var uintD x_lsd = x_LSDptr[-1]; # letztes Digit von x in I_rootp()
617 sub_loop_down(x_LSDptr,free_LSDptr,zz_LSDptr,k2); # zz:=x-y^n in I_rootp()
|
| H A D | intlog.d | 590 var uintD* x_LSDptr; in I_I_ash_I() local
591 I_to_NDS_nocopy(x, _EMA_,len=,x_LSDptr=); /* build DS for x. */ in I_I_ash_I()
599 var uintD* MSDptr = copy_loop_down(x_LSDptr,LSDptr,len); in I_I_ash_I()
|
| H A D | intdiv.d | 347 var uintD* x_LSDptr; in I_I_divide_I_I() local
352 BN_to_NDS_nocopy(x, x_MSDptr=,x_len=,x_LSDptr=); in I_I_divide_I_I()
362 UDS_divide(x_MSDptr,x_len,x_LSDptr,y_MSDptr,y_len,y_LSDptr, &q,&r); in I_I_divide_I_I()
|