Changeset 2200 for LMDZ5/trunk/libf/phylmd/physiq.F90

Timestamp:

Feb 9, 2015, 10:53:34 AM (9 years ago)

Author:

acozic

Message:

Aco : add some variable in inca routine call to correct a bug on time_axis with xios output

File:

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

LMDZ5/trunk/libf/phylmd/physiq.F90

@@ -1308 +1308 @@
              annee_ref, &
              day_ref,  &
+             day_ini, &
+             start_time, &
              itau_phy, &
              io_lon, &
@@ -3132 +3134 @@
      calday = REAL(days_elapsed + 1) + jH_cur
 
-     call chemtime(itap+itau_phy-1, date0, dtime)
+     call chemtime(itap+itau_phy-1, date0, dtime, itap)
      IF (config_inca == 'aero' .OR. config_inca == 'aeNP') THEN
         CALL AEROSOL_METEO_CALC( &