| version 1.4, 2003/11/17 12:04:20 |
version 1.5, 2004/07/04 02:31:51 |
|
|
| /* $OpenXM: OpenXM/src/ox_ntl/ntl.cpp,v 1.3 2003/11/15 09:06:20 iwane Exp $ */ |
/* $OpenXM: OpenXM/src/ox_ntl/ntl.cpp,v 1.4 2003/11/17 12:04:20 iwane Exp $ */ |
| |
|
| #include <NTL/ZZXFactoring.h> |
#include <NTL/ZZXFactoring.h> |
| #include <NTL/LLL.h> |
#include <NTL/LLL.h> |
| Line 74 ntl_fctr(cmo **arg, int argc) |
|
| Line 74 ntl_fctr(cmo **arg, int argc) |
|
| cmo * |
cmo * |
| ntl_lll(cmo **arg, int argc) |
ntl_lll(cmo **arg, int argc) |
| { |
{ |
| cmo *poly = arg[0]; |
|
| cmo_indeterminate *x; |
|
| ZZX f; |
ZZX f; |
| int ret; |
int ret; |
| cmon_mat_zz_t *mat; |
cmon_mat_zz_t *mat; |
| Line 97 ntl_lll(cmo **arg, int argc) |
|
| Line 95 ntl_lll(cmo **arg, int argc) |
|
| #endif |
#endif |
| |
|
| ZZ det2; |
ZZ det2; |
| long rd = LLL(det2, *mat->mat); |
mat_ZZ U; |
| |
long rd = LLL(det2, *mat->mat, U); |
| |
|
| #if __NTL_PRINT |
#if __NTL_PRINT |
| cout << "output: " << (*mat->mat) << endl; |
cout << "output: " << (*mat->mat) << endl; |
| |
cout << U << endl; |
| #endif |
#endif |
| |
|
| return ((cmo *)mat); |
return ((cmo *)mat); |