Changeset 2798 in Sophya for trunk/Eval/JET/jet.h

Timestamp:

Jun 4, 2005, 12:05:35 AM (20 years ago)

Author:

ansari

Message:

Adaptation aux modifs 2004-2005 de SOPHYA , compil pour PBG4 - Reza 3 Juin 2005

File:

• trunk/Eval/JET/jet.h (modified) (2 diffs)

trunk/Eval/JET/jet.h

@@ -3 +3 @@
 
 #include "machdefs.h"
+#include "sopnamsp.h"
+
+
 
 //========================================================
@@ -19 +22 @@
   ~MtxSize() {};
   void ReSize(const MtxSize  & a) { nrow_ = a.nrow_;  ncol_ = a.ncol_; } 
-  bool CompareSize(const MtxSize & a) const ;
+  bool CompareSize(const MtxSize & a) const 
+{
+  if ((a.nrow_ == 0) || (a.ncol_ == 0) )
+    throw RangeCheckError("MtxSize::CompareSize(mx) Size(mx) = 0");
+  if ((nrow_ == a.nrow_) && (ncol_ == a.ncol_))  return true;
+  else return false;
+}
 protected:
   sa_size_t nrow_, ncol_;