Changeset ba52f58 in git

Timestamp:

Jul 8, 2015, 6:41:19 PM (8 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

e9478bb30a6f3a2d77328b3805644a035ac3e934

Parents:

3f2942fb2df02ef47a6e1125188f5c588a05e8d2

Message:

Better Error output (more particulars) in ntTest

File:

• libpolys/polys/ext_fields/transext.cc (modified) (5 diffs)

libpolys/polys/ext_fields/transext.cc

@@ -191 +191 @@
       if (! nlIsInteger( p_GetCoeff(p, ntRing), ntCoeffs) )
       {
-        Print("ERROR: non-integer Q coeff in num. poly in %s:%d\n",f,l);        
+        Print("ERROR in %s:%d: non-integer Q coeff in num. poly\n",f,l);
+        Print("TERM: ");  p_wrp(p, ntRing); PrintLn();
         return FALSE;      
       }
@@ -205 +206 @@
         if (! nlIsInteger( p_GetCoeff(p, ntRing), ntCoeffs) )
         {
-          Print("ERROR: non-integer Q coeff in den. poly in %s:%d\n",f,l);        
+          Print("ERROR in %s:%d: non-integer Q coeff in den. poly\n",f,l);        
+          Print("TERM: "); p_wrp(p, ntRing);  PrintLn();
           return FALSE;      
         }
@@ -213 +215 @@
       if( p_IsConstant(den, ntRing) )
       {
-        Print("ERROR: constant den. poly / Zp in %s:%d\n",f,l);        
+        Print("ERROR in %s:%d: constant den. poly / Zp\n",f,l);
+        Print("NUM: ");  p_Write(num, ntRing);
+        Print("DEN: ");  p_Write(den, ntRing);
         return FALSE;
       }
@@ -219 +223 @@
       if( !n_IsOne(pGetCoeff(den), ntCoeffs) )
       {       
-        Print("ERROR: non-monic den. poly / Zp in %s:%d\n",f,l);        
+        Print("ERROR in %s:%d: non-monic den. poly / Zp\n",f,l);        
+        Print("NUM: ");  p_Write(num, ntRing);
+        Print("DEN: ");  p_Write(den, ntRing);
         return FALSE;
       }
@@ -226 +232 @@
     poly gcd = singclap_gcd_r( num, den, ntRing );
 
-    if( !(p_IsConstant(gcd, ntRing) && (n_IsOne(pGetCoeff(gcd), ntCoeffs))) )
-    {
-      Print("ERROR: 1 != GCD between num. & den. poly in %s:%d\n",f,l);        
+    if( !p_IsOne(gcd, ntRing) )
+    {
+      Print("ERROR in %s:%d: 1 != GCD between num. & den. poly\n",f,l);
+      Print("GCD: ");  p_Write(gcd, ntRing);
+      Print("NUM: ");  p_Write(num, ntRing);
+      Print("DEN: ");  p_Write(den, ntRing);
       return FALSE;
     }