diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/gen/gens.c | 3 | ||||
| -rw-r--r-- | src/misc/compat.h | 4 |
2 files changed, 5 insertions, 2 deletions
diff --git a/src/gen/gens.c b/src/gen/gens.c index 6e93f64..965a19e 100644 --- a/src/gen/gens.c +++ b/src/gen/gens.c @@ -7,6 +7,7 @@ #include "math/subgroup.h" #include "obj/point.h" #include "obj/subgroup.h" +#include "misc/compat.h" static subgroup_t *gens_point(GEN point, const curve_t *curve) { subgroup_t *sub = subgroup_new(); @@ -103,7 +104,7 @@ CHECK(gens_check_anomalous) { } GEN gens_get_embedding(GEN prime, GEN generator_order) { - return order(mkintmod(prime, generator_order)); + return znorder(mkintmod(prime, generator_order), NULL); } CHECK(gens_check_embedding) { diff --git a/src/misc/compat.h b/src/misc/compat.h index ba4a107..7e3d4e8 100644 --- a/src/misc/compat.h +++ b/src/misc/compat.h @@ -18,10 +18,12 @@ #define PARI_VERSION_LT(a,b,c) !(PARI_VERSION_GE(a,b,c)) #define PARI_VERSION_LE(a,b,c) !(PARI_VERSION_GT(a,b,c)) - #if PARI_VERSION_LT(2,12,1) #define polisirreducible isirreducible #endif +#if PARI_VERSION_LT(2,15,0) +#define znorder(x, o) order(x); +#endif #endif // ECGEN_MISC_COMPAT_H |