Index: trunk/psLib/src/dataManip/psConstants.h
===================================================================
--- trunk/psLib/src/dataManip/psConstants.h	(revision 2217)
+++ trunk/psLib/src/dataManip/psConstants.h	(revision 2218)
@@ -6,6 +6,6 @@
  *  @author GLG, MHPCC
  *
- *  @version $Revision: 1.25 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-10-27 21:06:30 $
+ *  @version $Revision: 1.26 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-10-27 21:25:52 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -36,4 +36,10 @@
 }
 
+#define PS_FLOAT_COMPARE(NAME1, NAME2, RVAL) \
+if ((NAME1 - NAME2) < -FLT_EPSILON) { \
+    psError(__func__,"%s is less than %s.", #NAME1, #NAME2); \
+    return(RVAL); \
+}
+
 
 
@@ -54,4 +60,15 @@
 }
 
+#define PS_PTR_CHECK_SIZE_EQUAL(PTR1, PTR2, RVAL) \
+if (PTR1->n != PTR2->n) { \
+    psError(__func__,"ptr %s has size %d, ptr %s has size %d.", #PTR1, PTR1->n, #PTR2, PTR2->n); \
+    return(RVAL); \
+}
+
+#define PS_PTR_CHECK_TYPE_EQUAL(PTR1, PTR2, RVAL) \
+if (PTR1->type.type != PTR2->type.type) { \
+    psError(__func__,"ptr %s has type %d, ptr %s has type %d.", #PTR1, PTR1->type.type, #PTR2, PTR2->type.type); \
+    return(RVAL); \
+}