Changeset ad5536d in git

Timestamp:

Jan 3, 2015, 3:12:13 AM (9 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

1af9eb5a4a3469cdc4f71b6fdc33f9255edaca043106b37eea17482acd0b02cc99f0d0d2f1419894cae897cd95de73fd3b92e79c5f074f227e120408

Parents:

2b006e68a8ff71427840c69ee9f61132a22a8d73

Message:

Fixed undesireable output of view: -1 = deg(0) -> "."

File:

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

Singular/LIB/schreyer.lib

@@ -3048 +3048 @@
 static proc repeat(int n, string c) { string r = ""; while( n > 0 ){ r = r + c; n--; } return(r); }
 static proc pad(int m, string s, string c){ string r = s; while( size(r) < m ){ r = c + r; } return(r); }
-
+static proc mstring( int m, string c){ if( m < 0 ) { return (c); }; return (string(m)); }
 // view helper
 static proc draw ( intmat D, int d )
@@ -3070 +3070 @@
   string dash  = repeat( (max + 1) * (nc - 2*d) , "-");
   string dash2 = repeat( (max + 1) * (nc - 2*d) , "=");
-  string v;
   for ( r = d+1; r <= (nr-d); r++ )
   {
     middle = middle + pad(max, string(D[r,1]), " ") + " :"; 
-    for ( c = d+1; c < (nc-d); c++ )
-    { if(D[r,c] < 0){ v = "."; } else { v = string(D[r,c]); };
-      middle = middle + pad(max, v, " ") + " "; 
-    }
-    middle = middle + pad(max, string(D[r,nc-d]), " ") + " |" + pad(max, string(D[r,nc]), " ") + newline;
+    for ( c = d+1; c < (nc-d); c++ ) { middle = middle + pad(max, mstring(D[r,c], "."), " ") + " "; }
+    middle = middle + pad(max, mstring(D[r,nc-d], "."), " ") + " |" + pad(max, string(D[r,nc]), " ") + newline;
   }
   string corner = repeat(max, " ");