Changeset 1e1ec4 in git for Singular/LIB/oldpolymake.lib

Timestamp:

Jan 4, 2013, 5:54:18 PM (11 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

42ea852aa2e1e683808b1ac3305dda96677af761

Parents:

8f296a6216092a84f1ebb509dbcda5fe428004f7

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2013-01-04 17:54:18+01:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2013-01-15 20:41:56+01:00

Message:

Updated LIBs according to master

add: new LIBs from master
fix: updated LIBs due to minpoly/(de)numerator changes
fix: -> $Id$
fix: Fixing wrong rebase of SW on master (LIBs)

File:

• Singular/LIB/oldpolymake.lib (modified) (12 diffs)

Singular/LIB/oldpolymake.lib

@@ -3 +3 @@
 category="Tropical Geometry";
 info="
-LIBRARY:   polymake.lib    Computations with polytopes and fans,
-                           interface to polymake and TOPCOM
+LIBRARY:   oldpolymake.lib  Computations with polytopes and fans,
+                            interface to polymake and TOPCOM
 AUTHOR:    Thomas Markwig,  email: keilen@mathematik.uni-kl.de
 
@@ -32 +32 @@
      independent of both, polymake and topcom.
 
-PROCEDURES USING POLYMAKE:
+PROCEDURES:
   polymakePolytope()   computes the vertices of a polytope using polymake
-  newtonPolytope()     computes the Newton polytope of a polynomial
+  newtonPolytopeP()     computes the Newton polytope of a polynomial
   newtonPolytopeLP()   computes the lattice points of the Newton polytope
   normalFan()          computes the normal fan of a polytope
@@ -41 +41 @@
   polymakeToIntmat()   transforms polymake output into an integer matrix
 
-PROCEDURES USING TOPCOM:
   triangulations()     computes all triangulations of a marked polytope
   secondaryPolytope()  computes the secondary polytope of a marked polytope
 
-PROCEDURES USING POLYMAKE AND TOPCOM:
   secondaryFan()       computes the secondary fan of a marked polytope
 
-PROCEDURES CONCERNED WITH PLANAR POLYGONS:
   cycleLength()      computes the cycleLength of cycle
   splitPolygon()     splits a marked polygon into vertices, facets, interior points
@@ -59 +56 @@
   ellipticNFDB()     displays the 16 normal forms of elliptic polygons
 
-AUXILARY PROCEDURES:
   polymakeKeepTmpFiles()  determines if the files created in /tmp should be kept
 
@@ -94 +90 @@
 /////////////////////////////////////////////////////////////////////////////
 
-proc polymakePolytope (intmat polytope,list #)
+proc polymakePolytope (intmat polytop,list #)
 "USAGE:  polymakePolytope(polytope[,#]);   polytope list, # string
 ASSUME:  each row of polytope gives the coordinates of a lattice point of a
@@ -158 +154 @@
   }
   // create the lattice point list for polymake
-  sp=sp+intmatToPolymake(polytope,"points");
+  sp=sp+intmatToPolymake(polytop,"points");
   // initialise dateiname.polymake and compute the vertices
   write(":w /tmp/"+dateiname+".polymake",sp);
@@ -222 +218 @@
   else
   {
-    intmat neq[1][ncols(polytope)+1];
+    intmat neq[1][ncols(polytop)+1];
   }
   // delete the tmp-files, if polymakekeeptmpfiles is not set
@@ -256 +252 @@
 /////////////////////////////////////////////////////////////////////////////
 
-proc newtonPolytope (poly f,list #)
-"USAGE: newtonPolytope(f[,#]);  f poly, # string
+proc newtonPolytopeP (poly f,list #)
+"USAGE: newtonPolytopeP(f[,#]);  f poly, # string
 RETURN: list L with four entries
 @*            L[1] : an integer matrix whose rows are the coordinates of vertices
@@ -287 +283 @@
          which then will be used instead of 'newtonPolytope' in the name of
          the polymake output file
-EXAMPLE: example newtonPolytope;   shows an example"
+EXAMPLE: example newtonPolytopeP;   shows an example"
 {
   int i,j;
@@ -315 +311 @@
    poly f=y3+x2+xy+2xz+yz+z2+1;
    // the Newton polytope of f is
-   list np=newtonPolytope(f);
+   list np=newtonPolytopeP(f);
    // the vertices of the Newton polytope are:
    np[1];
@@ -327 +323 @@
    f=x2-y3;
    // the Newton polytope of f is
-   np=newtonPolytope(f);
+   np=newtonPolytopeP(f);
    // the vertices of the Newton polytope are:
    np[1];
@@ -536 +532 @@
    poly f=y3+x2+xy+2xz+yz+z2+1;
    // the Newton polytope of f is
-   list np=newtonPolytope(f);
+   list np=newtonPolytopeP(f);
    // the Groebner fan of f, i.e. the normal fan of the Newton polytope
    list gf=normalFan(np[1],np[4],np[3],1,"x,y,z");