/[escript]/trunk/escript/src/DataExpanded.cpp
ViewVC logotype

Diff of /trunk/escript/src/DataExpanded.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 964 by gross, Tue Feb 13 05:10:26 2007 UTC revision 1023 by gross, Tue Mar 13 05:43:36 2007 UTC
# Line 15  Line 15 
15  #include "DataException.h"  #include "DataException.h"
16  #include "DataConstant.h"  #include "DataConstant.h"
17  #include "DataTagged.h"  #include "DataTagged.h"
18    #ifdef USE_NETCDF
19    #include <netcdfcpp.h>
20    #endif
21    
22  #include <boost/python/extract.hpp>  #include <boost/python/extract.hpp>
23    
# Line 617  DataExpanded::eigenvalues_and_eigenvecto Line 620  DataExpanded::eigenvalues_and_eigenvecto
620  void  void
621  DataExpanded::dump(const std::string fileName) const  DataExpanded::dump(const std::string fileName) const
622  {  {
623      throw DataException("Error - DataExpanded:: dump: not implemented.");     #ifdef PASO_MPI
624       throw DataException("Error - DataExpanded:: dump is not implemented for MPI yet.");
625       #endif
626       #ifdef USE_NETCDF
627       const int ldims=2+DataArrayView::maxRank;
628       const NcDim* ncdims[ldims];
629       NcVar *var, *ids;
630       int rank = getPointDataView().getRank();
631       int type=  getFunctionSpace().getTypeCode();
632       int ndims =0;
633       long dims[ldims];
634       DataArrayView::ShapeType shape = getPointDataView().getShape();
635    
636       // netCDF error handler
637       NcError err(NcError::verbose_nonfatal);
638       // Create the file.
639       NcFile dataFile(fileName.c_str(), NcFile::Replace);
640       // check if writing was successful
641       if (!dataFile.is_valid())
642            throw DataException("Error - DataExpanded:: opening of netCDF file for output failed.");
643       if (!dataFile.add_att("type","expanded") )
644            throw DataException("Error - DataExpanded:: appending data type to netCDF file failed.");
645       if (!dataFile.add_att("rank",rank) )
646            throw DataException("Error - DataExpanded:: appending rank attribute to netCDF file failed.");
647       if (!dataFile.add_att("function_space_type",type))
648            throw DataException("Error - DataExpanded:: appending function space attribute to netCDF file failed.");
649       ndims=rank+2;
650       if ( rank >0 ) {
651           dims[0]=shape[0];
652           if (! (ncdims[0] = dataFile.add_dim("d0",shape[0])) )
653                throw DataException("Error - DataExpanded:: appending ncdimsion 0 to netCDF file failed.");
654       }
655       if ( rank >1 ) {
656           dims[1]=shape[1];
657           if (! (ncdims[1] = dataFile.add_dim("d1",shape[1])) )
658                throw DataException("Error - DataExpanded:: appending ncdimsion 1 to netCDF file failed.");
659       }
660       if ( rank >2 ) {
661           dims[2]=shape[2];
662           if (! (ncdims[2] = dataFile.add_dim("d2", shape[2])) )
663                throw DataException("Error - DataExpanded:: appending ncdimsion 2 to netCDF file failed.");
664       }
665       if ( rank >3 ) {
666           dims[3]=shape[3];
667           if (! (ncdims[3] = dataFile.add_dim("d3", shape[3])) )
668                throw DataException("Error - DataExpanded:: appending ncdimsion 3 to netCDF file failed.");
669       }
670       dims[rank]=getFunctionSpace().getNumDataPointsPerSample();
671       if (! (ncdims[rank] = dataFile.add_dim("num_data_points_per_sample", dims[rank])) )
672                throw DataException("Error - DataExpanded:: appending num_data_points_per_sample to netCDF file failed.");
673       dims[rank+1]=getFunctionSpace().getNumSamples();
674       if (! (ncdims[rank+1] = dataFile.add_dim("num_samples", dims[rank+1])) )
675                throw DataException("Error - DataExpanded:: appending num_sample to netCDF file failed.");
676    
677       if (! ( ids = dataFile.add_var("id", ncInt, ncdims[rank+1])) )
678            throw DataException("Error - DataExpanded:: appending reference id to netCDF file failed.");
679       const int* ids_p=getFunctionSpace().borrowSampleReferenceIDs();
680       if (! (ids->put(ids_p,dims[rank+1])) )
681            throw DataException("Error - DataExpanded:: copy reference id  to netCDF buffer failed.");
682    
683       if (! ( var = dataFile.add_var("data", ncDouble, ndims, ncdims)) )
684            throw DataException("Error - DataExpanded:: appending variable to netCDF file failed.");
685       if (! (var->put(&m_data[0],dims)) )
686            throw DataException("Error - DataExpanded:: copy data to netCDF buffer failed.");
687       #else
688       throw DataException("Error - DataExpanded:: dump is not configured with netCDF. Please contact your installation manager.");
689       #endif
690  }  }
   
   
691  }  // end of namespace  }  // end of namespace

Legend:
Removed from v.964  
changed lines
  Added in v.1023

  ViewVC Help
Powered by ViewVC 1.1.26