Changeset 5134 for LMDZ6/branches/Amaury_dev/libf/phylmd/phyetat0_mod.F90

Timestamp:

Jul 26, 2024, 5:56:37 PM (8 weeks ago)

Author:

abarral

Message:

Replace academic.h, alpale.h, comdissip.h, comdissipn.h, comdissnew.h by modules
Remove unused clesph0.h

File:

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

LMDZ6/branches/Amaury_dev/libf/phylmd/phyetat0_mod.F90

@@ -42 +42 @@
     USE netcdf, ONLY: missing_val_netcdf => nf90_fill_real
     USE config_ocean_skin_m, ONLY: activate_ocean_skin
-
-    IMPLICIT none
+    USE lmdz_alpale
+
+    IMPLICIT NONE
     !======================================================================
     ! Auteur(s) Z.X. Li (LMD/CNRS) date: 19930818
@@ -50 +51 @@
     include "dimsoil.h"
     include "clesphys.h"
-    include "alpale.h"
     include "compbl.h"
     include "YOMCST.h"