Changeset 2076 for branches/newmole

Timestamp:

05/16/08 13:48:57 (8 months ago)

Author:

rjrw

Message:

Attempt to fix problem with PGI/ICC builds.

Location:

branches/newmole/source

Files:

• mole_priv.h (modified) (1 diff)
• mole_solve.cpp (modified) (3 diffs)

branches/newmole/source/mole_priv.h

@@ -17 +17 @@
 public:
         double fion[LIMELM][N_MOLE_ION];
-        void updateMolecules(const double * const b2);
+        void updateMolecules(const valarray<double> &b2);
         void setup(double *b0vec);
 };

branches/newmole/source/mole_solve.cpp

@@ -147 +147 @@
                 }
                 
-                MoleMap.updateMolecules( &newmols[0] );
+                MoleMap.updateMolecules( newmols );
                 
                 // fprintf(stdout,"Mole zone %ld -- %7.2f error %15.8g nBad %d\n",nzone,fnzone,error,nBad);
@@ -352 +352 @@
         DEBUG_ENTRY( "funjac()" );
 
-        MoleMap.updateMolecules( &b2vec[0] );           
+        MoleMap.updateMolecules( b2vec );               
                 
         if( iteration >= dynamics.n_initial_relax+1 && dynamics.lgAdvection /*&& radius.depth < dynamics.oldFullDepth*/ ) 
@@ -816 +816 @@
 }
 
-void GroupMap::updateMolecules(const double * const b2)
+void GroupMap::updateMolecules(const valarray<double> & b2)
 {
         long int