# HG changeset patch
# User jwe
# Date 781817926 0
# Node ID efdb7d3eddd8924262207e459f8bc4bc55b4a37d
# Parent  07b48e7ddd9bc00bf878bff777d29ae27a215703
[project @ 1994-10-10 19:35:30 by jwe]

diff -r 07b48e7ddd9b -r efdb7d3eddd8 src/det.cc
--- a/src/det.cc	Mon Oct 10 02:04:09 1994 +0000
+++ b/src/det.cc	Mon Oct 10 19:38:46 1994 +0000
@@ -94,7 +94,7 @@
 	  retval = d;
 	}
     }
-  else if (arg.is_complex_matrix ())
+  else if (arg.is_complex_type ())
     {
       ComplexMatrix m = arg.complex_matrix_value ();
 
diff -r 07b48e7ddd9b -r efdb7d3eddd8 src/lu.cc
--- a/src/lu.cc	Mon Oct 10 02:04:09 1994 +0000
+++ b/src/lu.cc	Mon Oct 10 19:38:46 1994 +0000
@@ -96,7 +96,7 @@
 	    }
 	}
     }
-  else if (arg.is_complex_matrix ())
+  else if (arg.is_complex_type ())
     {
       ComplexMatrix m = arg.complex_matrix_value ();
 
diff -r 07b48e7ddd9b -r efdb7d3eddd8 src/minmax.cc
--- a/src/minmax.cc	Mon Oct 10 02:04:09 1994 +0000
+++ b/src/minmax.cc	Mon Oct 10 19:38:46 1994 +0000
@@ -290,7 +290,7 @@
 		    }
 		}
 	    }
-	  else if (arg1.is_complex_matrix () || arg2.is_complex_type ())
+	  else if (arg1.is_complex_type () || arg2.is_complex_type ())
 	    {
 	      ComplexMatrix m1 = arg1.complex_matrix_value ();
 
@@ -362,7 +362,7 @@
 	{
           retval(0) = arg1.complex_value ();
 	}
-      else if (arg1.is_real_matrix ())
+      else if (arg1.is_real_type ())
 	{
 	  Matrix m = arg1.matrix_value ();
 	  if (m.rows () == 1)
@@ -370,7 +370,7 @@
 	  else
 	    retval(0) = tree_constant (m.column_max (), 0);
 	}
-      else if (arg1.is_complex_matrix ())
+      else if (arg1.is_complex_type ())
 	{
 	  ComplexMatrix m = arg1.complex_matrix_value ();
 	  if (m.rows () == 1)
@@ -396,7 +396,7 @@
 	  retval(1) = 1;
 	  retval(0) = arg1.complex_value ();
 	}
-      else if (arg1.is_real_matrix ())
+      else if (arg1.is_real_type ())
 	{
 	  Matrix m = arg1.matrix_value ();
 	  if (m.rows () == 1)
@@ -410,7 +410,7 @@
 	      retval(0) = tree_constant (m.column_max (), 0);
 	    }
 	}
-      else if (arg1.is_complex_matrix ())
+      else if (arg1.is_complex_type ())
 	{
 	  ComplexMatrix m = arg1.complex_matrix_value ();
 	  if (m.rows () == 1)
@@ -455,13 +455,13 @@
 		result = b_elem;
 	      retval(0) = result;
 	    }
-	  else if (arg1.is_real_matrix ())
+	  else if (arg1.is_real_type ())
 	    {
 	      Matrix result;
 	      result = max (arg1.matrix_value (), arg2.matrix_value ());
 	      retval(0) = result;
 	    }
-	  else if (arg1.is_complex_matrix ())
+	  else if (arg1.is_complex_type ())
 	    {
 	      ComplexMatrix result;
 	      result = max (arg1.complex_matrix_value (),
diff -r 07b48e7ddd9b -r efdb7d3eddd8 src/schur.cc
--- a/src/schur.cc	Mon Oct 10 02:04:09 1994 +0000
+++ b/src/schur.cc	Mon Oct 10 19:38:46 1994 +0000
@@ -96,7 +96,7 @@
       return retval;
     }
 
-  if (arg.is_real_matrix ())
+  if (arg.is_real_type ())
     {
       Matrix tmp = arg.matrix_value ();
 
@@ -115,7 +115,7 @@
 	    }
 	}
     }
-  else if (arg.is_complex_matrix ())
+  else if (arg.is_complex_type ())
     {
       ComplexMatrix ctmp = arg.complex_matrix_value ();