- Timestamp:
- Jun 29, 2018, 12:31:11 PM (6 years ago)
- Location:
- LMDZ6/branches/DYNAMICO-conv
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/DYNAMICO-conv
- Property svn:mergeinfo changed
-
LMDZ6/branches/DYNAMICO-conv/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90
r3326 r3356 46 46 USE ioipsl_getin_p_mod, ONLY: getin_p 47 47 USE slab_heat_transp_mod, ONLY: ini_slab_transp_geom 48 #ifdef REPROBUS 49 USE CHEM_REP, ONLY : Init_chem_rep_phys 50 #endif 48 51 IMPLICIT NONE 49 52 … … 178 181 rlonudyn,rlatudyn,rlonvdyn,rlatvdyn) 179 182 #endif 183 IF (type_trac == 'repr') THEN 184 #ifdef REPROBUS 185 CALL Init_chem_rep_phys(klon_omp,nbp_lev) 186 #endif 187 END IF 180 188 END IF 181 189
Note: See TracChangeset
for help on using the changeset viewer.