Changeset 5159 for LMDZ6/branches/Amaury_dev/libf/phylmd/rrtm/gppref.F90

Timestamp:

Aug 2, 2024, 9:58:25 PM (7 weeks ago)

Author:

abarral

Message:

Put dimensions.h and paramet.h into modules

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/rrtm/gppref.F90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/rrtm/gppref.F90

@@ -21 +21 @@
 !                              PRESH(KPROMA,0:KFLEV) - HALF LEVEL PRESSURE
 !                              PRESF(KPROMA,KFLEV)   - FULL LEVEL PRESSURE
-!
+
 !        Implicit arguments :  NONE.
 !        --------------------
@@ -105 +105 @@
 ! assumption that the top level input for pressure is 0 hPa.
 ! This restriction is only necessary in the case of use of NDLNPR=1.
-!
+
 ! LVERTFE : .T./.F. Finite element/conventional vertical discretisation.
 ! NDLNPR  : NDLNPR=0: conventional formulation of delta, i.e. ln(P(l)/P(l-1)).
 !           NDLNPR=1: formulation of delta used in non hydrostatic model,
 ! LAPRXPK : way of computing full-levels pressures in primitive equation
-!
+
 LVERTFE=.TRUE.    !!!!! A REVOIR (MPL) comment faut-il vraiment calculer PRESF ?