Changeset 16129

Timestamp:

09/12/13 12:45:00 (12 years ago)

Author:

utke

Message:

make this bcast call type consistent

File:

• issm/trunk-jpl/src/c/classes/IoModel.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/classes/IoModel.cpp

@@ -390 +390 @@
                                                         if(fread(&pscalar,sizeof(IssmPDouble),1,this->fid)!=1) _error_("could not read scalar ");
                                                         ISSM_MPI_Bcast(&pscalar,1,ISSM_MPI_PDOUBLE,0,IssmComm::GetComm()); 
-                                                        scalar=reCast<IssmDouble>(pscalar);
+                                                        scalar=pscalar;
                                                 }
 
@@ -490 +490 @@
                                 case 3:
                                         /*scalar. get it from cpu 0 */
-                                        ISSM_MPI_Bcast(&scalar,1,ISSM_MPI_DOUBLE,0,IssmComm::GetComm()); 
-
+                                        ISSM_MPI_Bcast(&pscalar,1,ISSM_MPI_PDOUBLE,0,IssmComm::GetComm());
+                                        scalar=pscalar;
                                         /*create DoubleParam: */
                                         this->constants->AddObject(new DoubleParam(record_enum,scalar));