Changeset 185


Ignore:
Timestamp:
04/28/11 10:53:26 (10 years ago)
Author:
hozdoba
Message:
 
Location:
XMLIO_V2/dev/dev_rv
Files:
1 added
2 deleted
8 edited

Legend:

Unmodified
Added
Removed
  • XMLIO_V2/dev/dev_rv/Makefile.wk

    r182 r185  
    1616GUI       = no 
    1717NPROC     = 3 
    18 CSUITE    = intel 
     18CSUITE    = gnu 
    1919PFORME    = fedora-wk 
    2020FORTEXT   = .f90 
     
    317317           buffer_list buffer_pair                          \ 
    318318           data_treatment data_output                       \ 
    319            rebuild functor mask configure 
     319           rebuild functor configure 
    320320 
    321321# Sources des gestionnaires (contenues dans le dossier manager) 
  • XMLIO_V2/dev/dev_rv/src/xmlio/fortran/impi_interface.f90

    r182 r185  
    8585       
    8686      ! ATTTENTION GROS BUG ICI  SOUS GNU MAIS PAS INTEL ???????? voir datatype 
    87       ! PRINT *, datatype, MPI_CHARACTER 
     87      ! PRINT *, datatype, MPI_CHARACTER, xios_mpi_char 
    8888      CALL MPI_GET_COUNT(status, MPI_CHARACTER, count, err) 
    8989   END SUBROUTINE xios_mpi_get_count 
  • XMLIO_V2/dev/dev_rv/src/xmlio/main_server.cpp

    r179 r185  
    1515      
    1616      CXIOSManager::Initialise(CXIOSManager::CLIENT_SERVER, &argc, &argv); 
     17       
    1718      CXIOSManager::AddClient("nemo"    , 2, 2, &nemo_fake_entry); 
    1819      //CXIOSManager::AddClient("orchidee", 1, 1, &orchidee_fake_entry); 
  • XMLIO_V2/dev/dev_rv/src/xmlio/manager/mpi_manager.cpp

    r182 r185  
    190190         if (error != mpi_success) 
    191191            ERROR("CMPIManager::getReceivedDataSize (comm, rank)", << " MPI Error !"); 
    192          if (flag == false) return (0); 
     192         if (flag == false) return (0);         
    193193         mpi_get_count(status, &type, &size, &error); 
    194194         if (error != mpi_success) 
  • XMLIO_V2/dev/dev_rv/src/xmlio/node/domain.cpp

    r184 r185  
    398398   void CDomain::completeLonLat(void) 
    399399   { 
     400      //ARRAY_CREATE(value, valuetype, numdims, extent)// todo 
     401      //ARRAY_CREATE(value, valuetype, numdims, extent) 
     402       
    400403      ARRAY(double, 1) lonvalue_ = this->lonvalue.getValue(), 
    401404                       latvalue_ = this->latvalue.getValue(); 
     
    403406      if (this->data_dim.getValue() == 2) 
    404407      { 
    405          StdSize dn = this->ni.getValue()*this->nj.getValue(); 
     408         StdSize dn = this->ni.getValue() * this->nj.getValue(); 
    406409         lonvalue_->resize(boost::extents[dn]); 
    407410         latvalue_->resize(boost::extents[dn]); 
     
    424427            } 
    425428         }    
    426           
    427429      } 
    428430      else 
     
    560562   void CDomain::completeMask(void) 
    561563   { 
    562       this->local_mask->resize(boost::extents[ni.getValue()][nj.getValue()]); 
     564      this->local_mask->resize(boost::extents[zoom_ni_loc.getValue()][zoom_nj_loc.getValue()]); 
    563565   } 
    564566 
  • XMLIO_V2/dev/dev_rv/src/xmlio/node/grid.cpp

    r184 r185  
    383383      } 
    384384       
    385       StdOFStream ofs(this->getId().c_str()); 
    386       for (StdSize h = 0; h < storeIndex_srv->size(); h++) 
    387       { 
    388         ofs << "(" << (*storeIndex_srv)[h]  << ";" 
    389             << (*out_i_index_srv)[h] << "," 
    390             << (*out_j_index_srv)[h] << "," 
    391             << (*out_l_index_srv)[h] << ")" << std::endl; 
    392       } 
    393       ofs.close(); 
     385      //~ StdOFStream ofs(this->getId().c_str()); 
     386      //~ for (StdSize h = 0; h < storeIndex_srv->size(); h++) 
     387      //~ { 
     388        //~ ofs << "(" << (*storeIndex_srv)[h]  << ";" 
     389            //~ << (*out_i_index_srv)[h] << "," 
     390            //~ << (*out_j_index_srv)[h] << "," 
     391            //~ << (*out_l_index_srv)[h] << ")" << std::endl; 
     392      //~ } 
     393      //~ ofs.close(); 
    394394       
    395395   } 
     
    401401                           ARRAY(double, 1)  storedServer) const 
    402402   { 
    403       if ((this->storeIndex.size() -1 ) != storedClient.size()) 
     403      if ((this->storeIndex.size()-1 ) != storedClient.size()) 
    404404         ERROR("CGrid::inputFieldServer(...)", 
    405405                << "[ Nombre de tableau attendu = " << (this->storeIndex.size()-1) << ", " 
  • XMLIO_V2/dev/dev_rv/src/xmlio/output/nc4_data_output.cpp

    r183 r185  
    7676         ARRAY(int, 2) mask = domain->getLocalMask(); 
    7777 
    78          unsigned int ssize = domain->ni.getValue() * domain->nj.getValue(); 
     78         unsigned int ssize = domain->zoom_ni_loc.getValue() * domain->zoom_nj_loc.getValue(); 
    7979         bool isCurvilinear = (domain->lonvalue.getValue()->size() == ssize); 
    8080 
     
    9797            case (MULTI_FILE) : 
    9898            { 
    99                SuperClassWriter::addDimension(lonid_loc, domain->ni.getValue()); 
    100                SuperClassWriter::addDimension(latid_loc, domain->nj.getValue()); 
     99               SuperClassWriter::addDimension(lonid_loc, domain->zoom_ni_loc.getValue()); 
     100               SuperClassWriter::addDimension(latid_loc, domain->zoom_nj_loc.getValue()); 
    101101               this->writeLocalAttributes(domain->ibegin.getValue(), domain->iend.getValue(), 
    102102                                          domain->jbegin.getValue(), domain->jend.getValue(), 
  • XMLIO_V2/dev/dev_rv/src/xmlio/output/onetcdf4.hpp

    r183 r185  
    66#include "exception.hpp" 
    77#include "array.hpp" 
    8 #include "mask.hpp" 
    98#include "data_output.hpp" 
    109#include "mpi_manager.hpp" 
Note: See TracChangeset for help on using the changeset viewer.