Changeset 8d8fef in git for Singular/LIB/matrix.lib

Timestamp:

Jul 29, 2019, 11:36:09 PM (5 years ago)

Author:

Murray Heymann <heymann.murray@…>

Branches:

(u'spielwiese', '73c62e0961bcfc8f1a00420b41eec2ea3c0ef6e9')

Children:

feed60bef09898f675e0f8605ed0ac0eaa8bed5a

Parents:

da1ec3de158a4f05384b9a83be86fc4c1942ec5fc1b9ababa50e8059dd847da0957f50aea901e6a8

Message:

Merge branch 'machine_learning' of github.com:MHeymann/Sources into machine_learning

File:

• Singular/LIB/matrix.lib (modified) (2 diffs)

Singular/LIB/matrix.lib

@@ -1068 +1068 @@
 
 //------------------------- create ring container for symmetric power basis-
-  execute("ring @@@SYM_POWER_RING_NAME=(0),("+S+"(1.."+string(n)+")),dp;");
-
+  list l2;
+  for (int ii = 1; ii <= n; ii++)
+  {
+    l2[ii] = S+"("+string(ii)+")";
+  }
+  ring @@@SYM_POWER_RING_NAME = create_ring(0, l2, "dp");
 //------------------------- choose symmetric basis -------------------------
   ideal symBasis = maxideal(k);
@@ -1116 +1120 @@
 
 //------------------------- create ring container for symmetric power basis-
-  execute("ring @@@EXT_POWER_RING_NAME=(0),("+S+"(1.."+string(n)+")),dp;");
+  list l2;
+  for (int ii = 1; ii <= n; ii++)
+  {
+    l2[ii] = S+"("+string(ii)+")";
+  }
+  ring @@@EXT_POWER_RING_NAME = create_ring(0, l2, "dp");
 
 //------------------------- choose exterior basis -------------------------