Changeset 9b5240 in git

Timestamp:

Jun 2, 2004, 5:59:32 PM (20 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

f4bb7153e16ec3985493802befee171c8dc34466

Parents:

025942c7975176bc8476434e325cc5c24ba8622b

Message:

*hannes: PrintS


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

File:

• kernel/syz3.cc (modified) (16 diffs)

kernel/syz3.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: syz3.cc,v 1.1.1.1 2003-10-06 12:16:04 Singular Exp $ */
+/* $Id: syz3.cc,v 1.2 2004-06-02 15:59:12 Singular Exp $ */
 /*
 * ABSTRACT: resolutions
@@ -99 +99 @@
     Print("der %d-te modul ist:\n",i);
     idPrint(syzstr->res[i]);
-    Print("Seine Darstellung:\n");
+    PrintS("Seine Darstellung:\n");
     idPrint(syzstr->orderedRes[i]);
     i++;
@@ -397 +397 @@
                 if (ti<l) 
                 {
-                  if (TEST_OPT_PROT) Print("cc");
+                  if (TEST_OPT_PROT) PrintS("cc");
                   syDeletePair(&(*resPairs)[ti]);
                   syCompactifyPairSet(*resPairs,*l_pairs,ti);
@@ -452 +452 @@
 #ifdef SHOW_PROT
 Print("erzeuge Paar im Modul %d,%d mit: \n",index,tso.order);
-Print("poly1: ");pWrite(tso.p1);
-Print("poly2: ");pWrite(tso.p2);
-Print("syz: ");pWrite(tso.syz);
-Print("sPoly: ");pWrite(tso.p);
+PrintS("poly1: ");pWrite(tso.p1);
+PrintS("poly2: ");pWrite(tso.p2);
+PrintS("syz: ");pWrite(tso.syz);
+PrintS("sPoly: ");pWrite(tso.p);
 PrintLn();
 #endif
@@ -675 +675 @@
   {
     if (TEST_OPT_PROT)
-      Print(".");
+      PrintS(".");
     if (index==0)
     {
@@ -760 +760 @@
 #ifdef SHOW_PROT
 Print("reduziere Paar im Module %d mit: \n",index);
-Print("poly1: ");pWrite(tso.p1);
-Print("poly2: ");pWrite(tso.p2);
-Print("syz: ");pWrite(tso.syz);
-Print("sPoly: ");pWrite(tso.p);
+PrintS("poly1: ");pWrite(tso.p1);
+PrintS("poly2: ");pWrite(tso.p2);
+PrintS("syz: ");pWrite(tso.syz);
+PrintS("sPoly: ");pWrite(tso.p);
 #endif
     assume(tso.syz!=NULL);
@@ -835 +835 @@
   else
   {
-    Print("Shit happens!\n");
+    PrintS("Shit happens!\n");
   }
 #ifdef SHOW_PROT
 Print("erhalte Paar im Module %d mit: \n",index);
-Print("syz: ");pWrite(tso.syz);
-Print("sPoly: ");pWrite(tso.p);
+PrintS("syz: ");pWrite(tso.syz);
+PrintS("sPoly: ");pWrite(tso.p);
 PrintLn();
 #endif
@@ -1096 +1096 @@
                 if (ti<l) 
                 {
-                  if (TEST_OPT_PROT) Print("cc");
+                  if (TEST_OPT_PROT) PrintS("cc");
                   syDeletePair(&(*resPairs)[ti]);
                   syCompactifyPairSet(*resPairs,*l_pairs,ti);
@@ -1151 +1151 @@
 #ifdef SHOW_PROT
 Print("erzeuge Paar im Modul %d,%d mit: \n",index,tso.order);
-Print("poly1: ");pWrite(tso.p1);
-Print("poly2: ");pWrite(tso.p2);
-Print("syz: ");pWrite(tso.syz);
-Print("sPoly: ");pWrite(tso.p);
+PrintS("poly1: ");pWrite(tso.p1);
+PrintS("poly2: ");pWrite(tso.p2);
+PrintS("syz: ");pWrite(tso.syz);
+PrintS("sPoly: ");pWrite(tso.p);
 PrintLn();
 #endif
@@ -1196 +1196 @@
   {
     if (TEST_OPT_PROT)
-      Print(".");
+      PrintS(".");
 #ifdef USE_PROD_CRIT
     if (pFDeg(tso.p1)+pFDeg(tso.p2)==tso.order+pFDeg(deg_soc))
     {
-      if (TEST_OPT_PROT) Print("pc");
+      if (TEST_OPT_PROT) PrintS("pc");
       int ac=pGetComp(tso.p1);
       assume(ac=pGetComp(tso.p2));
@@ -1269 +1269 @@
 #ifdef SHOW_PROT
 Print("reduziere Paar im Module %d mit: \n",index);
-Print("poly1: ");pWrite(tso.p1);
-Print("poly2: ");pWrite(tso.p2);
-Print("syz: ");pWrite(tso.syz);
-Print("sPoly: ");pWrite(tso.p);
+PrintS("poly1: ");pWrite(tso.p1);
+PrintS("poly2: ");pWrite(tso.p2);
+PrintS("syz: ");pWrite(tso.syz);
+PrintS("sPoly: ");pWrite(tso.p);
 #endif
     assume(tso.syz!=NULL);
@@ -1303 +1303 @@
   else
   {
-    Print("Shit happens!\n");
+    PrintS("Shit happens!\n");
   }
 #ifdef SHOW_PROT
 Print("erhalte Paar im Module %d mit: \n",index);
-Print("syz: ");pWrite(tso.syz);
-Print("sPoly: ");pWrite(tso.p);
+PrintS("syz: ");pWrite(tso.syz);
+PrintS("sPoly: ");pWrite(tso.p);
 PrintLn();
 #endif
@@ -1321 +1321 @@
     }
   }
-  if ((TEST_OPT_PROT) && (tso.syz==NULL)) Print("null");
+  if ((TEST_OPT_PROT) && (tso.syz==NULL)) PrintS("null");
   if ((tso.p!=NULL) && (pGetComp(tso.p)>crit_comp))
   {
@@ -1731 +1731 @@
     //omFreeSize((ADDRESS)og_l,IDELEMS(syzstr->res[0])*sizeof(int));
 #ifdef SHOW_PROT
-Print("Add new generators: \n");
+PrintS("Add new generators:\n");
 idPrint(new_generators);
-Print("with representaions: \n");
+PrintS("with representaions:\n");
 idPrint(new_repr);
 #endif
@@ -1902 +1902 @@
           {
             if (isRegular)
-              Print("\n regular\n");
+              PrintS("\n regular\n");
             else
-              Print("\n not regular\n");
+              PrintS("\n not regular\n");
           }
           if (next_gen!=NULL)
@@ -1989 +1989 @@
           else
           {
-            Print("Da ist was faul!!!\n");
+            PrintS("Da ist was faul!!!\n");
             Print("Aber: Regularitaet %d, Grad %d\n",syzstr->regularity,pFDeg(totake[index]->m[i]));
           }