~vcs-imports/escript-finley/trunk

#include "DataConstant.h"

#include "DataException.h"

#include "esysUtils/EsysAssert.h"

 

#include <iostream>

#include <boost/python/extract.hpp>

#ifdef USE_NETCDF

#include <netcdfcpp.h>

#endif

 

#include "DataMaths.h"

 

// #define CHECK_FOR_EX_WRITE if (!checkNoSharing()) {throw DataException("Attempt to modify shared object");}

   DataTypes::ShapeType shape = getShape();

   int mpi_iam=getFunctionSpace().getDomain()->getMPIRank();

   int mpi_num=getFunctionSpace().getDomain()->getMPISize();

   MPI_Status status;

#endif

 

   /* Serialize NetCDF I/O */

   if (mpi_iam>0) MPI_Recv(&ndims, 0, MPI_INT, mpi_iam-1, 81802, MPI_COMM_WORLD, &status);

#endif

        throw DataException("Error - DataConstant:: appending variable to netCDF file failed.");

   if (! (var->put(d_ptr,dims)) )

         throw DataException("Error - DataConstant:: copy data to netCDF buffer failed.");

   if (mpi_iam<mpi_num-1) MPI_Send(&ndims, 0, MPI_INT, mpi_iam+1, 81802, MPI_COMM_WORLD);

#endif

   #else