diff src/pr-output.cc @ 2305:5a3f1d00a474

[project @ 1996-07-09 16:20:40 by jwe]
author jwe
date Tue, 09 Jul 1996 16:20:40 +0000
parents 6abec42e52f6
children 8c09c04f7747
line wrap: on
line diff
--- a/src/pr-output.cc
+++ b/src/pr-output.cc
@@ -108,7 +108,7 @@
   int nc = a.columns ();
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
-      if (a.elem (i, j) < 0.0)
+      if (a (i, j) < 0.0)
 	return 1;
   return 0;
 }
@@ -123,7 +123,7 @@
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
       {
-	double val = a.elem (i, j);
+	double val = a (i, j);
 	if (xisinf (val) || xisnan (val))
 	  return 1;
       }
@@ -138,7 +138,7 @@
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
       {
-	Complex val = a.elem (i, j);
+	Complex val = a (i, j);
 	if (xisinf (val) || xisnan (val))
 	  return 1;
       }
@@ -153,7 +153,7 @@
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
       {
-	double val = a.elem (i, j);
+	double val = a (i, j);
 	if (xisnan (val) || D_NINT (val) == val)
 	  continue;
 	else
@@ -170,7 +170,7 @@
   Matrix retval (nr, nc);
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
-      retval.elem (i, j) = fabs (a.elem (i, j));
+      retval (i, j) = fabs (a (i, j));
   return retval;
 }
 
@@ -185,7 +185,7 @@
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
       {
-	double val = m.elem (i, j);
+	double val = m (i, j);
 	if (xisinf (val) || xisnan (val))
 	  continue;
 
@@ -206,7 +206,7 @@
   for (int j = 0; j < nc; j++)
     for (int i = 0; i < nr; i++)
       {
-	double val = m.elem (i, j);
+	double val = m (i, j);
 	if (xisinf (val) || xisnan (val))
 	  continue;
 
@@ -1191,7 +1191,7 @@
 	      if (j == 0)
 		os << "  ";
 
-	      if (m.elem (i, j) == 0.0)
+	      if (m (i, j) == 0.0)
 		os << " ";
 	      else
 		os << "+";
@@ -1257,7 +1257,7 @@
 			    os << "  ";
 			}
 
-		      pr_float (os, m.elem (i, j));
+		      pr_float (os, m (i, j));
 		    }
 
 		  col += inc;
@@ -1291,7 +1291,7 @@
 		    {
 		      os << "  ";
 
-		      pr_float (os, m.elem (i, j), fw);
+		      pr_float (os, m (i, j), fw);
 		    }
 
 		  os << "\n";
@@ -1343,7 +1343,7 @@
 	      if (j == 0)
 		os << "  ";
 
-	      if (cm.elem (i, j) == 0.0)
+	      if (cm (i, j) == 0.0)
 		os << " ";
 	      else
 		os << "+";
@@ -1410,7 +1410,7 @@
 			    os << "  ";
 			}
 
-		      pr_complex (os, cm.elem (i, j));
+		      pr_complex (os, cm (i, j));
 		    }
 
 		  col += inc;
@@ -1444,7 +1444,7 @@
 		    {
 		      os << "  ";
 
-		      pr_complex (os, cm.elem (i, j));
+		      pr_complex (os, cm (i, j));
 		    }
 		  os << "\n";
 		}