Changeset 2789 for LMDZ5/trunk/libf

Timestamp:

Feb 6, 2017, 2:04:15 PM (8 years ago)

Author:

Ehouarn Millour

Message:

Fix problem introduced in rev2786 : Call to init_vertical_layers not needed in lmdz1d because done in inigeomphy which is called by iniphysiq.
EM

File:

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

LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90

@@ -41 +41 @@
    USE comvert_mod, ONLY: presnivs, ap, bp, dpres,nivsig, nivsigs, pa, &
                           preff, aps, bps, pseudoalt, scaleheight
-   USE vertical_layers_mod, ONLY: init_vertical_layers
    USE temps_mod, ONLY: annee_ref, calend, day_end, day_ini, day_ref, &
                         itau_dyn, itau_phy, start_time
@@ -645 +644 @@
 !       Dans ce cas, on lit ap,bp dans le fichier hybrid.txt
       ENDIF
-      ! initialize ap,bp, etc. in vertical_layers_mod
-      CALL init_vertical_layers(llm,preff,scaleheight, &
-                                ap,bp,aps,bps,presnivs,pseudoalt)
 
       sig_s=presnivs/preff