Changeset 691
- Timestamp:
- 09/15/15 17:31:24 (9 years ago)
- Location:
- XIOS/trunk
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/trunk/bld.cfg
r688 r691 35 35 bld::target xios_server.exe test_remap.exe 36 36 #bld::target test_new_features.exe test_unstruct_complete.exe 37 #bld::target test_client.exe test_complete.exe37 bld::target test_client.exe test_complete.exe 38 38 bld::exe_dep 39 39 -
XIOS/trunk/src/interface/c_attr/icdomain_attr.cpp
r690 r691 386 386 387 387 388 void cxios_set_domain_i_index(domain_Ptr domain_hdl, int* i_index, int extent1)388 void cxios_set_domain_i_index(domain_Ptr domain_hdl, int* i_index, int* extent) 389 389 { 390 390 CTimer::get("XIOS").resume(); -
XIOS/trunk/src/interface/fortran_attr/domain_interface_attr.F90
r690 r691 315 315 316 316 317 SUBROUTINE cxios_set_domain_i_index(domain_hdl, i_index, extent 1) BIND(C)317 SUBROUTINE cxios_set_domain_i_index(domain_hdl, i_index, extent) BIND(C) 318 318 USE ISO_C_BINDING 319 319 INTEGER (kind = C_INTPTR_T), VALUE :: domain_hdl -
XIOS/trunk/src/node/domain.cpp
r689 r691 787 787 } 788 788 789 if (!bounds_lon_1d.isEmpty() && nvertex.getValue() != bounds_lon_1d.extent( 1))789 if (!bounds_lon_1d.isEmpty() && nvertex.getValue() != bounds_lon_1d.extent(0)) 790 790 ERROR("CDomain::checkBounds(void)", 791 791 << "[ id = " << this->getId() << " , context = '" << CObjectFactory::GetCurrentContextId() << " ] " … … 794 794 << " but nvertex is " << nvertex.getValue() << "."); 795 795 796 if (!bounds_lon_2d.isEmpty() && nvertex.getValue() != bounds_lon_2d.extent( 2))796 if (!bounds_lon_2d.isEmpty() && nvertex.getValue() != bounds_lon_2d.extent(0)) 797 797 ERROR("CDomain::checkBounds(void)", 798 798 << "[ id = " << this->getId() << " , context = '" << CObjectFactory::GetCurrentContextId() << " ] " … … 811 811 << "Since 'bounds_lon_2d' is defined, 'lonvalue_2d' must be defined too." << std::endl); 812 812 813 if (!bounds_lat_1d.isEmpty() && nvertex.getValue() != bounds_lat_1d.extent( 1))813 if (!bounds_lat_1d.isEmpty() && nvertex.getValue() != bounds_lat_1d.extent(0)) 814 814 ERROR("CDomain::checkBounds(void)", 815 815 << "[ id = " << this->getId() << " , context = '" << CObjectFactory::GetCurrentContextId() << " ] " … … 818 818 << " but nvertex is " << nvertex.getValue() << "."); 819 819 820 if (!bounds_lat_2d.isEmpty() && nvertex.getValue() != bounds_lat_2d.extent( 2))820 if (!bounds_lat_2d.isEmpty() && nvertex.getValue() != bounds_lat_2d.extent(0)) 821 821 ERROR("CDomain::checkBounds(void)", 822 822 << "[ id = " << this->getId() << " , context = '" << CObjectFactory::GetCurrentContextId() << " ] "
Note: See TracChangeset
for help on using the changeset viewer.