Changeset 3887 for LMDZ6/branches/LMDZ-INCA-Dyn

Timestamp:

May 4, 2021, 5:08:12 PM (4 years ago)

Author:

acozic

Message:

merge with rev [3877] on trunk

File:

• LMDZ6/branches/LMDZ-INCA-Dyn/libf/phylmd/physiq_mod.F90 (modified) (2 diffs)

LMDZ6/branches/LMDZ-INCA-Dyn/libf/phylmd/physiq_mod.F90

@@ -1535 +1535 @@
        ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
        CALL init_iophy_new(latitude_deg,longitude_deg)
-       CALL create_etat0_limit_unstruct
-       CALL phyetat0 ("startphy.nc",clesphy0,tabcntr0)
 
           !===================================================================
@@ -1733 +1731 @@
 #endif
        IF(read_climoz>=1 .AND. create_etat0_limit) CALL regr_horiz_time_climoz(read_climoz,ok_daily_climoz)
+       CALL create_etat0_limit_unstruct
+       CALL phyetat0 ("startphy.nc",clesphy0,tabcntr0)
 
 !jyg<