Changeset 67b671 in git for Singular/LIB/grwalk.lib

Timestamp:

Jun 29, 2019, 4:20:05 PM (5 years ago)

Author:

Sachin <sachinkm308@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'aefe9ae36ec8df52dbdbefda02828f18f27715b3')

Children:

f2aefad298e7d312159153aa4bb4e8d8f2fe08b3

Parents:

d90fef85ca2c62d55b0f856b13bb352f199e2883

git-author:

Sachin <sachinkm308@gmail.com>2019-06-29 16:20:05+02:00

git-committer:

Andreas Steenpass <steenpass@mathematik.uni-kl.de>2019-07-01 14:09:41+02:00

Message:

Replaced execute with create_ring() functions

File:

• Singular/LIB/grwalk.lib (modified) (6 diffs)

Singular/LIB/grwalk.lib

@@ -236 +236 @@
    def xR = basering;
 
-   execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");
+   ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly");
+   
    def old_ring = basering;
 
@@ -292 +293 @@
    def xR = basering;
 
-   execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");
+   ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly");
    def old_ring = basering;
    //print("//** help ring = " + string(basering));
@@ -328 +329 @@
    option(redSB);
    def xR = basering;
-
-   execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");
+   ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly");
    def old_ring = basering;
    //print("//** help ring = " + string(basering));
@@ -377 +377 @@
    option(redSB);   def xR = basering;
 
-   execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");
+   ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly");
    def old_ring = basering;
 
@@ -435 +435 @@
   def xR = basering;
 
-  execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");
+  ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly");
   def old_ring = basering;
 
@@ -483 +483 @@
   def xR = basering;
 
-  execute("ring ostR = ("+charstr(xR)+"),("+varstr(xR)+"),"+ord_str+";");
+  ring ostR = create_ring(ringlist(xR)[1],"("+varstr(xR)+")",ord_str,"no_minpoly");
   def old_ring = basering;