Index: trunk/psLib/src/math/psMatrix.c
===================================================================
--- trunk/psLib/src/math/psMatrix.c	(revision 3264)
+++ trunk/psLib/src/math/psMatrix.c	(revision 3290)
@@ -21,6 +21,6 @@
  *  @author Robert DeSonia, MHPCC
  *
- *  @version $Revision: 1.23 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2005-02-17 19:26:23 $
+ *  @version $Revision: 1.24 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2005-02-19 00:30:07 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -588,5 +588,5 @@
         PS_CHECK_DIMEN_AND_TYPE(inVector, PS_DIMEN_VECTOR, outImage);
         PS_VECTOR_CHECK_EMPTY(inVector, outImage);
-        outImage = psImageRecycle(outImage, 1, inVector->n, PS_TYPE_F64);
+        outImage = psImageRecycle(outImage, 1, inVector->n, inVector->type.type);
         // More checks for PS_DIMEN_VECTOR
         if (outImage->numCols > 1) {
@@ -607,5 +607,5 @@
         PS_CHECK_DIMEN_AND_TYPE(inVector, PS_DIMEN_TRANSV, outImage);
         PS_VECTOR_CHECK_EMPTY(inVector, outImage);
-        outImage = psImageRecycle(outImage, inVector->n, 1, PS_TYPE_F64);
+        outImage = psImageRecycle(outImage, inVector->n, 1, inVector->type.type);
         // More checks for PS_DIMEN_TRANSV
         if (outImage->numRows > 1) {