Changeset 5137 for LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

Timestamp:

Jul 28, 2024, 10:25:12 PM (3 months ago)

Author:

abarral

Message:

Put gradsdef.h, tracstoke.h, clesphys.h into modules

File:

• LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

@@ -43 +43 @@
     USE lmdz_iniprint, ONLY: lunout, prt_level
     USE lmdz_comgeom
+    USE lmdz_tracstoke
 
     IMPLICIT NONE
@@ -53 +54 @@
     INCLUDE "dimensions.h"
     INCLUDE "paramet.h"
-    INCLUDE "tracstoke.h"
 
     REAL, INTENT (IN) :: prad ! radius of the planet (m)