Changeset 5283 for LMDZ6/trunk/libf/dynphy_lonlat/phylmd

Timestamp:

Oct 28, 2024, 1:47:34 PM (4 days ago)

Author:

abarral

Message:

Turn tracstoke.h conema3.h cv30_routines.f90 cv30param.h into modules

File:

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

LMDZ6/trunk/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

@@ -38 +38 @@
   USE bands, ONLY : distrib_phys
 #endif
+  USE tracstoke_mod_h
   USE iniprint_mod_h
   USE comgeom_mod_h
@@ -56 +57 @@
 
 
-  include "tracstoke.h"
 
   REAL, INTENT (IN) :: prad ! radius of the planet (m)