← Back to branch summary

~vcs-imports/escript-finley/trunk

« back to all changes in this revision

Viewing changes to escript/src/DataExpanded.cpp

  • Committer: jfenwick
  • Date: 2010-10-11 01:48:14 UTC
  • Revision ID: svn-v4:77569008-7704-0410-b7a0-a92fef0b09fd:trunk:3259
Merging dudley and scons updates from branches

Show diffs side-by-side

added added

removed removed

Lines of Context:
escript/src/DataExpanded.cpp
20
20
#ifdef USE_NETCDF
21
21
#include <netcdfcpp.h>
22
22
#endif
23
 
#ifdef PASO_MPI
 
23
#ifdef ESYS_MPI
24
24
#include <mpi.h>
25
25
#endif
26
26
 
663
663
   const DataTypes::ShapeType& shape = getShape();
664
664
   int mpi_iam=getFunctionSpace().getDomain()->getMPIRank();
665
665
   int mpi_num=getFunctionSpace().getDomain()->getMPISize();
666
 
#ifdef PASO_MPI
 
666
#ifdef ESYS_MPI
667
667
   MPI_Status status;
668
668
#endif
669
669
 
670
 
#ifdef PASO_MPI
 
670
#ifdef ESYS_MPI
671
671
   /* Serialize NetCDF I/O */
672
672
   if (mpi_iam>0) MPI_Recv(&ndims, 0, MPI_INT, mpi_iam-1, 81801, MPI_COMM_WORLD, &status);
673
673
#endif
727
727
     if (! (var->put(d_ptr,dims)) )
728
728
        throw DataException("Error - DataExpanded:: copy data to netCDF buffer failed.");
729
729
   }
730
 
#ifdef PASO_MPI
 
730
#ifdef ESYS_MPI
731
731
   if (mpi_iam<mpi_num-1) MPI_Send(&ndims, 0, MPI_INT, mpi_iam+1, 81801, MPI_COMM_WORLD);
732
732
#endif
733
733
   #else