Changeset bbf49b8 in git for Singular/LIB/presolve.lib

Timestamp:

Jan 15, 2014, 4:49:05 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

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

Children:

538c8cd688adf1bd3fa4ae496c26a69ae0abe8b1

Parents:

112fd151f309f96d3629bc82576ad75cef64eb2c

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2014-01-15 16:49:05+01:00

git-committer:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2014-01-15 16:49:20+01:00

Message:

add data types to procedures, p3

File:

• Singular/LIB/presolve.lib (modified) (11 diffs)

Singular/LIB/presolve.lib

@@ -31 +31 @@
 LIB "elim.lib";
 ///////////////////////////////////////////////////////////////////////////////
-proc shortid (id,int n,list #)
+proc shortid (def id,int n,list #)
 "USAGE:   shortid(id,n[,e]); id= ideal/module, n,e=integers
 RETURN:  - if called with two arguments or e=0:
@@ -86 +86 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc degreepart (id,int d1,int d2,list #)
+proc degreepart (def id,int d1,int d2,list #)
 "USAGE:   degreepart(id,d1,d2[,v]);  id=ideal/module, d1,d1=integers, v=intvec
 RETURN:  list of size 2,
@@ -142 +142 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc linearpart (id)
+proc linearpart (def id)
 "USAGE:   linearpart(id);  id=ideal/module
 RETURN:  list of size 2,
@@ -666 +666 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc faststd (@id, list #)
+proc faststd (def @id, list #)
 "USAGE:   faststd(id [,\"hilb\",\"sort\",\"dec\",o,\"blocks\"]);
          id=ideal/module, o=string (allowed:\"lp\",\"dp\",\"Dp\",\"ls\",
@@ -836 +836 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc findvars(id, list #)
+proc findvars(def id, list #)
 "USAGE:   findvars(id [,any] ); id=poly/ideal/vector/module/matrix, any=any type
 RETURN:  if no second argument is present: ideal of variables occuring in id,@*
@@ -885 +885 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc hilbvec (@id, list #)
+proc hilbvec (def @id, list #)
 "USAGE:   hilbvec(id[,c,o]); id=poly/ideal/vector/module/matrix, c,o=strings,@*
           c=char, o=ordering used by @code{hilb} (default: c=\"32003\", o=\"dp\")
@@ -916 +916 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc tolessvars (id ,list #)
+proc tolessvars (def id ,list #)
 "USAGE:   tolessvars(id [,s1,s2] ); id poly/ideal/vector/module/matrix,
           s1=string (new ordering)@*
@@ -983 +983 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc solvelinearpart (id,list #)
+proc solvelinearpart (def id,list #)
 "USAGE:   solvelinearpart(id [,n] );  id=ideal/module, n=integer (default: n=0)
 RETURN:  (interreduced) generators of id of degree <=1 in reduced triangular
@@ -1032 +1032 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc sortandmap (@id, list #)
+proc sortandmap (def @id, list #)
 "USAGE:   sortandmap(id [,n1,p1,n2,p2...,o1,m1,o2,m2...]);@*
          id=poly/ideal/vector/module,@*
@@ -1128 +1128 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc sortvars (id, list #)
+proc sortvars (def id, list #)
 "USAGE:   sortvars(id[,n1,p1,n2,p2,...]);@*
          id=poly/ideal/vector/module,@*
@@ -1190 +1190 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-proc valvars (id, list #)
+proc valvars (def id, list #)
 "USAGE:   valvars(id[,n1,p1,n2,p2,...]);@*
          id=poly/ideal/vector/module,@*