Changeset 815 in Sophya for trunk/SophyaPI/PIext

Timestamp:

Apr 5, 2000, 5:46:05 PM (25 years ago)

Author:

ercodmgr

Message:

Adaptation modifs TArray - Reza 5/4/2000

Location:

trunk/SophyaPI/PIext

Files:

• nomskymapadapter.cc (modified) (1 diff)
• pawexecut.cc (modified) (1 diff)

trunk/SophyaPI/PIext/nomskymapadapter.cc

@@ -173 +173 @@
   int_4 nl = mtx.NRows();
   int_4 nc = mtx.NCols();
-  mtx.DataBlock().Reset(defval);   // On met tout a defval
+  mtx = defval;   // On met tout a defval
 //  cout << " NRows= " << nl << "  NCols= " << nc  << endl;
   for(l=0; l<nl; l++) {

trunk/SophyaPI/PIext/pawexecut.cc

@@ -145 +145 @@
 else if(typeid(*mobj)==typeid(Matrix))  {Matrix*  ob=(Matrix*) mobj; ob->Zero();}
 #else
-if(typeid(*mobj)==typeid(Vector))       {Vector*  ob=(Vector*) mobj; ob->DataBlock().Reset(0.);}
-else if(typeid(*mobj)==typeid(Matrix))  {Matrix*  ob=(Matrix*) mobj; ob->DataBlock().Reset(0.);}
+ if(typeid(*mobj)==typeid(Vector))       {Vector*  ob=(Vector*) mobj; (*ob) = 0.; }
+// ob->DataBlock().Reset(0.);}
+ else if(typeid(*mobj)==typeid(Matrix))   {Matrix*  ob=(Matrix*) mobj; (*ob) = 0.; }
+//ob->DataBlock().Reset(0.);}
 #endif
 else if(typeid(*mobj)==typeid(Histo))   {Histo*   ob=(Histo*)  mobj; ob->Zero();}