spielwiese
Last change
on this file since 4e803e was
4e803e,
checked in by Christian Eder, 15 years ago
|
updated header inclusions due to lplist, new get()
git-svn-id: file:///usr/local/Singular/svn/trunk@11210 2c84dea3-7e68-4137-9b89-c4e89433aadc
|
-
Property mode set to
100644
|
File size:
1.7 KB
|
Line | |
---|
1 | /**************************************** |
---|
2 | * Computer Algebra System SINGULAR * |
---|
3 | ****************************************/ |
---|
4 | /* $Id: lpolynomial.cc,v 1.2 2008-11-27 17:18:45 ederc Exp $ */ |
---|
5 | /* |
---|
6 | * ABSTRACT: lpolynomial definition |
---|
7 | */ |
---|
8 | #include "mod2.h" |
---|
9 | |
---|
10 | #ifdef HAVE_F5 |
---|
11 | #include "kutil.h" |
---|
12 | #include "structs.h" |
---|
13 | #include "omalloc.h" |
---|
14 | #include "polys.h" |
---|
15 | #include "p_polys.h" |
---|
16 | #include "ideals.h" |
---|
17 | #include "febase.h" |
---|
18 | #include "kstd1.h" |
---|
19 | #include "khstd.h" |
---|
20 | #include "kbuckets.h" |
---|
21 | #include "weight.h" |
---|
22 | #include "intvec.h" |
---|
23 | #include "pInline1.h" |
---|
24 | #include "f5gb.h" |
---|
25 | #include "lpolynomial.h" |
---|
26 | #include "lplist.h" |
---|
27 | /* |
---|
28 | ================================================================ |
---|
29 | all functions working on the class LPoly for labeled polynomials |
---|
30 | ================================================================ |
---|
31 | */ |
---|
32 | void LPoly::setPoly(poly p) |
---|
33 | { |
---|
34 | polynomial = p; |
---|
35 | } |
---|
36 | |
---|
37 | void LPoly::setTerm(poly t) { |
---|
38 | term = t; |
---|
39 | } |
---|
40 | |
---|
41 | void LPoly::setIndex(long i) { |
---|
42 | index = i; |
---|
43 | } |
---|
44 | |
---|
45 | |
---|
46 | void LPoly::setDel(bool b) { |
---|
47 | del = b; |
---|
48 | } |
---|
49 | |
---|
50 | void LPoly::setNext(LPoly* l) { |
---|
51 | next = l; |
---|
52 | } |
---|
53 | |
---|
54 | poly LPoly::getPoly() { |
---|
55 | return polynomial; |
---|
56 | } |
---|
57 | |
---|
58 | poly LPoly::getTerm() { |
---|
59 | return term; |
---|
60 | } |
---|
61 | |
---|
62 | long LPoly::getIndex() { |
---|
63 | return index; |
---|
64 | } |
---|
65 | |
---|
66 | bool LPoly::getDel() { |
---|
67 | return del; |
---|
68 | } |
---|
69 | |
---|
70 | LPoly* LPoly::getNext() { |
---|
71 | return next; |
---|
72 | } |
---|
73 | |
---|
74 | /* |
---|
75 | ===================================================== |
---|
76 | comparing two labeled polynomials by their signatures |
---|
77 | ===================================================== |
---|
78 | */ |
---|
79 | int LPoly::compare(const LPoly& lp) { |
---|
80 | if(index > lp.index) { |
---|
81 | return 1; |
---|
82 | } |
---|
83 | if(index < lp.index) { |
---|
84 | return -1; |
---|
85 | } |
---|
86 | return 0; |
---|
87 | } |
---|
88 | |
---|
89 | void LPoly::get() { |
---|
90 | Print("Label: "); |
---|
91 | pWrite(getTerm()); |
---|
92 | Print(" %d\n",getIndex()); |
---|
93 | } |
---|
94 | #endif |
---|
Note: See
TracBrowser
for help on using the repository browser.