Changeset 5118 for LMDZ6/branches/Amaury_dev/libf/dyn3d_common/diagedyn.f90

Timestamp:

Jul 24, 2024, 4:39:59 PM (2 months ago)

Author:

abarral

Message:

Replace iniprint.h by lmdz_iniprint.f90
(lint) along the way

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3d_common/diagedyn.f90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/dyn3d_common/diagedyn.f90

@@ -53 +53 @@
 
   USE control_mod, ONLY: planet_type
+  USE lmdz_iniprint, ONLY: lunout, prt_level
 
   IMPLICIT NONE
@@ -59 +60 @@
   INCLUDE "paramet.h"
   INCLUDE "comgeom.h"
-  INCLUDE "iniprint.h"
 
   ! Ehouarn: for now set these parameters to what is in Earth physics...