spielwiese
Last change
on this file since c8f78a2 was
c8f78a2,
checked in by Michael Brickenstein <bricken@…>, 19 years ago
|
*bricken: initial version
git-svn-id: file:///usr/local/Singular/svn/trunk@8646 2c84dea3-7e68-4137-9b89-c4e89433aadc
|
-
Property mode set to
100644
|
File size:
552 bytes
|
Line | |
---|
1 | from Singular import * |
---|
2 | from interpreter import * |
---|
3 | singular=singular_globals_proxy() |
---|
4 | |
---|
5 | def create_ring(char=0, nvars=1, varNames=None, ordering="dp", degvec=None): |
---|
6 | if not varNames: |
---|
7 | varNames=["x("+str(i)+")" for i in xrange(1,nvars+1)] |
---|
8 | else: |
---|
9 | nvars=len(varNames) |
---|
10 | if not degvec: |
---|
11 | degvec=intvec() |
---|
12 | for i in xrange(0,nvars): |
---|
13 | degvec.append(1) |
---|
14 | print degvec |
---|
15 | modulweights=intvec() |
---|
16 | modulweights.append(0) |
---|
17 | print modulweights |
---|
18 | l=[char,varNames,[[ordering,degvec],["C",modulweights]], ideal()] |
---|
19 | #print l |
---|
20 | return singular.ring(l) |
---|
21 | |
---|
Note: See
TracBrowser
for help on using the repository browser.