Changeset beb237 in git for Singular/polys0.cc

Timestamp:

Oct 26, 2000, 6:31:38 PM (24 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

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

Children:

3849365e4f7f90e48ef4cb1bdb73305514b60eaa

Parents:

9c5e4ff8f71d38aa39fa99cc20aec1cc01f874b2

Message:

* strat->tailRing progress!!!


git-svn-id: file:///usr/local/Singular/svn/trunk@4679 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/polys0.cc (modified) (7 diffs)

Singular/polys0.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys0.cc,v 1.16 2000-10-23 12:02:18 obachman Exp $ */
+/* $Id: polys0.cc,v 1.17 2000-10-26 16:31:38 obachman Exp $ */
 
 /*
@@ -80 +80 @@
 }
 
-char* pString0(poly p, ring lmRing, ring tailRing)
+char* p_String0(poly p, ring lmRing, ring tailRing)
 {
   if (p == NULL)
@@ -124 +124 @@
 }
 
-char* pString(poly p, ring lmRing, ring tailRing)
+char* p_String(poly p, ring lmRing, ring tailRing)
 {
   StringSetS("");
-  return pString0(p, lmRing, tailRing);
+  return p_String0(p, lmRing, tailRing);
 }
 
@@ -133 +133 @@
 * writes a polynomial p to stdout
 */
-void pWrite0(poly p, ring lmRing, ring tailRing)
+void p_Write0(poly p, ring lmRing, ring tailRing)
 {
-  PrintS(pString(p, lmRing, tailRing));
+  PrintS(p_String(p, lmRing, tailRing));
 }
 
@@ -141 +141 @@
 * writes a polynomial p to stdout followed by \n
 */
-void pWrite(poly p, ring lmRing, ring tailRing)
+void p_Write(poly p, ring lmRing, ring tailRing)
 {
-  pWrite0(p, lmRing, tailRing);
+  p_Write0(p, lmRing, tailRing);
   PrintLn();
 }
@@ -152 +152 @@
 *possibly followed by the string "+..."
 */
-void wrp0(poly p, ring ri)
+void p_wrp0(poly p, ring ri)
 {
   poly r;
 
   if (p==NULL) PrintS("NULL");
-  else if (pNext(p)==NULL) pWrite0(p, ri);
+  else if (pNext(p)==NULL) p_Write0(p, ri);
   else
   {
     r = pNext(p);
     pNext(p) = NULL;
-    pWrite0(p, ri);
+    p_Write0(p, ri);
     if (r!=NULL)
     {
@@ -170 +170 @@
   }
 }
-void wrp(poly p, ring lmRing, ring tailRing)
+void p_wrp(poly p, ring lmRing, ring tailRing)
 {
   poly r;
 
   if (p==NULL) PrintS("NULL");
-  else if (pNext(p)==NULL) pWrite0(p, lmRing);
+  else if (pNext(p)==NULL) p_Write0(p, lmRing);
   else
   {
     r = pNext(pNext(p));
     pNext(pNext(p)) = NULL;
-    pWrite0(p, lmRing, tailRing);
+    p_Write0(p, lmRing, tailRing);
     if (r!=NULL)
     {