4
#include "polynomial.h"
5
#include "buchberger.h"
6
#include "reversesearch.h"
8
#include "genericwalk.h"
9
#include "gfanapplication.h"
11
#include "tropical2.h"
13
#include "field_rationals.h"
15
class SPolynomialApplication : public GFanApplication
17
SimpleOption optionTakeInitialForms;
19
bool includeInDefaultInstallation()
23
const char *helpText()
25
return "This program takes a list of polynomials and a weight vector. The output is the set of all...\n";
27
SPolynomialApplication():
28
optionTakeInitialForms("-f",".\n")
35
return "_spolynomial";
40
PolynomialSet g=FileParser(Stdin).parsePolynomialSetWithRing();
41
IntegerVector w=FileParser(Stdin).parseIntegerVector();
43
// WeightReverseLexicographicTermOrder T(w);
47
PolynomialSet out(g.getRing());
50
for(PolynomialSet::const_iterator i=g.begin();i!=g.end();i++,I++)
53
for(PolynomialSet::const_iterator j=g.begin();j!=i;j++,J++)
55
Polynomial s=sPolynomial(*i,*j);
56
IntegerVector cancelingTerm=max(i->getMarked().m.exponent,j->getMarked().m.exponent);
57
int cancelDegree=dotLong(cancelingTerm,w);
58
if(optionTakeInitialForms.getValue())
60
if(cancelDegree!=s.degree(w))
62
out.push_back(initialForm(s,w));
63
if(initialForm(s,w).numberOfTerms()<=8)cerr<<"S("<<I<<","<<J<<")"<<endl;
70
// AsciiPrinter(Stdout).printPolynomialSet(out);
72
PolynomialSet out2(out.getRing());
73
for(PolynomialSet::const_iterator i=out.begin();i!=out.end();i++)
75
cerr<< i->numberOfTerms() << " ";
76
if(i->numberOfTerms()<=8)
78
AsciiPrinter(Stdout)<<"\n"<< *i<<"\n";
83
out2=out2.embeddedInto(PolynomialRing(Q,15));
85
AsciiPrinter(Stdout).printPolynomialRing(out2.getRing());
86
AsciiPrinter(Stdout).printPolynomialSet(out2);
92
static SPolynomialApplication theApplication;