|
 |
47eeb38 |
--- src/basemath/mftrace.c.orig 2020-10-19 16:07:40.945917453 -0600
|
|
|
47eeb38 |
+++ src/basemath/mftrace.c 2020-10-19 16:21:03.543190445 -0600
|
|
|
47eeb38 |
@@ -3714,7 +3714,7 @@ static GEN
|
|
|
47eeb38 |
RgV_shimura(GEN A, long n, long t, long N, long r, GEN CHI)
|
|
|
47eeb38 |
{
|
|
|
47eeb38 |
GEN R, a0, Pn = mfcharpol(CHI);
|
|
|
47eeb38 |
- long m, st, ord = mfcharorder(CHI), vt = varn(Pn), Nt = t == 1? N: ulcm(N,t);
|
|
|
47eeb38 |
+ long m, st, ord = mfcharorder(CHI), vt = varn(Pn), Nt = t == 1? N: (long)ulcm(N,t);
|
|
|
47eeb38 |
|
|
|
47eeb38 |
R = cgetg(n + 2, t_VEC);
|
|
|
47eeb38 |
st = odd(r)? -t: t;
|
|
|
47eeb38 |
--- src/basemath/polarit3.c.orig 2020-10-15 02:36:36.000000000 -0600
|
|
|
47eeb38 |
+++ src/basemath/polarit3.c 2020-10-19 16:20:19.515201075 -0600
|
|
|
47eeb38 |
@@ -936,7 +936,7 @@ gen_inccrt_i(const char *str, GEN worker
|
|
|
47eeb38 |
forprime_t *S, GEN *pH, GEN *pmod, GEN crt(GEN, GEN, GEN*),
|
|
|
47eeb38 |
GEN center(GEN, GEN, GEN))
|
|
|
47eeb38 |
{
|
|
|
47eeb38 |
- long m = mmin? minss(mmin, n): usqrt(n);
|
|
|
47eeb38 |
+ long m = mmin? minss(mmin, n): (long)usqrt(n);
|
|
|
47eeb38 |
GEN H, P, mod;
|
|
|
47eeb38 |
pari_timer ti;
|
|
|
47eeb38 |
if (DEBUGLEVEL > 4)
|