Changeset 815 in Sophya for trunk/SophyaPI/PIext/pawexecut.cc

Timestamp:

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

Author:

ercodmgr

Message:

Adaptation modifs TArray - Reza 5/4/2000

File:

• trunk/SophyaPI/PIext/pawexecut.cc (modified) (1 diff)

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();}