Changeset 2609 for LMDZ5/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

Timestamp:

Aug 1, 2016, 11:09:36 AM (8 years ago)

Author:

acozic

Message:

change the way to transfer the value of config_inca parameter to INCA model

File:

• LMDZ5/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

@@ -29 +29 @@
   USE CHEM_REP, ONLY : Init_chem_rep_phys
 #endif
-  USE control_mod, ONLY: dayref,anneeref,day_step,nday,offline, iphysiq
+  USE control_mod, ONLY: dayref,anneeref,day_step,nday,offline, iphysiq, config_inca
   USE inifis_mod, ONLY: inifis
   USE time_phylmdz_mod, ONLY: init_time
@@ -141 +141 @@
      call init_const_lmdz( &
           anneeref,dayref, iphysiq,day_step,nday,  &
-          nbsrf, is_oce,is_sic, is_ter,is_lic, calend)
+          nbsrf, is_oce,is_sic, is_ter,is_lic, calend, &
+          config_inca)
      call init_inca_para( &
           nbp_lon,nbp_lat,nbp_lev,klon_glo,mpi_size, &