[35aab3] | 1 | // emacs edit mode for this file is -*- C++ -*- |
---|
| 2 | /**************************************** |
---|
| 3 | * Computer Algebra System SINGULAR * |
---|
| 4 | ****************************************/ |
---|
[341696] | 5 | // $Id$ |
---|
[35aab3] | 6 | /* |
---|
| 7 | * ABSTRACT: interface between Singular and factory |
---|
| 8 | */ |
---|
| 9 | |
---|
| 10 | |
---|
| 11 | #ifndef INCL_FACTORYSING_H |
---|
| 12 | #define INCL_FACTORYSING_H |
---|
| 13 | |
---|
[599326] | 14 | #include <kernel/structs.h> |
---|
| 15 | #include <kernel/polys.h> |
---|
| 16 | #include <kernel/ideals.h> |
---|
| 17 | #include <kernel/intvec.h> |
---|
| 18 | #include <kernel/matpol.h> |
---|
| 19 | #include <kernel/longalg.h> |
---|
[35aab3] | 20 | |
---|
| 21 | poly singclap_gcd ( poly f, poly g ); |
---|
[91d0e6] | 22 | poly singclap_gcd_r ( poly f, poly g, const ring r ); |
---|
[35aab3] | 23 | napoly singclap_alglcm ( napoly f, napoly g ); |
---|
| 24 | void singclap_algdividecontent ( napoly f, napoly g, napoly &ff, napoly &gg ); |
---|
| 25 | |
---|
| 26 | poly singclap_resultant ( poly f, poly g , poly x); |
---|
| 27 | |
---|
| 28 | BOOLEAN singclap_extgcd ( poly f, poly g, poly &res, poly &pa, poly &pb ); |
---|
[6620d75] | 29 | BOOLEAN singclap_extgcd_r ( poly f, poly g, poly &res, poly &pa, poly &pb, const ring r ); |
---|
[35aab3] | 30 | |
---|
| 31 | poly singclap_pdivide ( poly f, poly g ); |
---|
[d1f231] | 32 | poly singclap_pdivide_r ( poly f, poly g, const ring r ); |
---|
[35aab3] | 33 | |
---|
| 34 | void singclap_divide_content ( poly f ); |
---|
| 35 | |
---|
| 36 | ideal singclap_factorize ( poly f, intvec ** v , int with_exps); |
---|
| 37 | |
---|
[0dd641] | 38 | ideal singclap_sqrfree ( poly f ); |
---|
| 39 | |
---|
[35aab3] | 40 | matrix singclap_irrCharSeries ( ideal I); |
---|
| 41 | |
---|
| 42 | BOOLEAN singclap_isSqrFree(poly f); |
---|
| 43 | |
---|
| 44 | char* singclap_neworder ( ideal I); |
---|
| 45 | |
---|
| 46 | poly singclap_det( const matrix m ); |
---|
| 47 | int singclap_det_i( intvec * m ); |
---|
| 48 | |
---|
| 49 | BOOLEAN jjRESULTANT(leftv res, leftv u, leftv v, leftv w); |
---|
| 50 | BOOLEAN jjCHARSERIES(leftv res, leftv u); |
---|
| 51 | #if 0 |
---|
| 52 | BOOLEAN jjIS_SQR_FREE(leftv res, leftv u); |
---|
| 53 | #endif |
---|
| 54 | |
---|
| 55 | #endif /* INCL_FACTORYSING_H */ |
---|
| 56 | |
---|