Changeset e89ff5 in git for Singular/LIB/schreyer.lib

Timestamp:

May 11, 2012, 5:39:56 PM (12 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

5428647f3ac13d90ef45d257602f128804d6920a

Parents:

ed31a6cf71be2add371af4493e8c396c256ca950

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-05-11 17:39:56+02:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-05-15 15:49:50+02:00

Message:

moved proc Tail to the dyn. module

add: Tail command within syzextra (for poly/vector/ideal/module)

File:

• Singular/LIB/schreyer.lib (modified) (4 diffs)

Singular/LIB/schreyer.lib

@@ -447 +447 @@
 LIB "general.lib"; // for sort
 
-// TODO: in C++!
-static proc Tail(def M)
+/* static proc Tail(def M) // DONE: in C++ (dyn. module: syzextra)!
 {
   int i = ncols(M); def m;
@@ -454 +453 @@
   {
     m = M[i];
-
-    m = m - lead(m); // m = tail(m)
-    
-    M[i] = m;
-    
+    m = m - lead(m); // m = tail(m)    
+    M[i] = m;    
     i--;
   }
   return (M);
-}
+}*/
+
 
 /* static */ proc SSinit(def M)
@@ -1426 +1423 @@
 //      exportto(Schreyer, Syzextra::p_Content);
 
+      exportto(Schreyer, Syzextra::Tail);
     }
     else
@@ -1458 +1456 @@
 //      exportto(Schreyer, Syzextra_g::p_Content);
 
+      exportto(Schreyer, Syzextra_g::Tail);
       
     }