Changeset 5284 for LMDZ6/trunk/libf/dynphy_lonlat

Timestamp:

Oct 28, 2024, 2:12:55 PM (6 weeks ago)

Author:

abarral

Message:

Turn alpale.h alpale.f90 YOETHF.h into modules

File:

• LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.f90

@@ -96 +96 @@
   USE phys_state_var_mod, ONLY: beta_aridity, delta_tsurf, awake_dens, cv_gen, &
        ratqs_inter_
-  !use ioipsl
+  USE alpale_mod
   IMPLICIT NONE
 !-------------------------------------------------------------------------------
@@ -131 +131 @@
 
   INCLUDE "compbl.h"
-  INCLUDE "alpale.h"
-  
+
   deg2rad= pi/180.0
   iml=assert_eq(SIZE(masque,1),SIZE(phis,1),TRIM(modname)//" iml")