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