Changeset 465 for branches/GRISLIv3/SOURCES/neffect-0.4.f90

Timestamp:

01/26/24 10:24:00 (4 months ago)

Author:

aquiquet

Message:

Cleaning branch: start cleaning module3D

File:

• branches/GRISLIv3/SOURCES/neffect-0.4.f90 (modified) (1 diff)

branches/GRISLIv3/SOURCES/neffect-0.4.f90

@@ -19 +19 @@
   use param_phy_mod, only: ro,row,g
   use runparam, only: itracebug
-  use module3D_phy, only: flotmx,flotmy,coefmxbmelt,coefmybmelt,hwater,neffmx,neffmy,hmx,hmy,hwatermax
+  use module3D_phy, only: flotmx,flotmy,coefmxbmelt,coefmybmelt,hwater,neffmx,neffmy,hmx,hmy
   use geography, only: nx,ny
-  use module_choix, only: eaubasale
+!  use module_choix, only: eaubasale <- afq, not clean, I prefer to use  explicitly eau_basale
+  use eau_basale, only: hwatermax,eaubasale
 
   implicit none