Changeset 2351 for LMDZ5/trunk/libf/phylmd/surf_land_orchidee_mod.F90
- Timestamp:
- Aug 25, 2015, 5:14:59 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/surf_land_orchidee_mod.F90
r2348 r2351 16 16 USE cpl_mod, ONLY : cpl_send_land_fields 17 17 USE surface_data, ONLY : type_ocean 18 USE comgeomphy, ONLY : cuphy, cvphy18 USE geometry_mod, ONLY : dx, dy 19 19 USE mod_grid_phy_lmdz 20 USE mod_phys_lmdz_para, mpi_root_rank=>mpi_ root20 USE mod_phys_lmdz_para, mpi_root_rank=>mpi_master 21 21 22 22 IMPLICIT NONE … … 330 330 DO igrid = 1, knon 331 331 ij = knindex(igrid) 332 resolution(igrid,1) = cuphy(ij)333 resolution(igrid,2) = cvphy(ij)332 resolution(igrid,1) = dx(ij) 333 resolution(igrid,2) = dy(ij) 334 334 ENDDO 335 335
Note: See TracChangeset
for help on using the changeset viewer.