Commit b6d45893 authored by Peter Bruin's avatar Peter Bruin

rewrite curve_divisor_to_point using matsmall_quotient

parent 9ac01137
......@@ -30,10 +30,7 @@ GEN
curve_divisor_to_point (GEN X, GEN P) {
unsigned long p = curve_base_field_characteristic (X);
GEN T = curve_base_field_polynomial (X);
pari_sp av = avma;
P = matsmall_solve (curve_V (X, 1), P, p, T);
P = matsmall_coker (P, p, T);
return gerepileupto (av, P);
return matsmall_quotient(curve_V(X, 1), P, p, T);
}
/*
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment