Changeset 5271 for LMDZ6/trunk/libf/dyn3dmem/top_bound_loc.f90

Timestamp:

Oct 24, 2024, 4:25:39 PM (26 hours ago)

Author:

abarral

Message:

Move dimensions.h into a module
Nb: doesn't compile yet

File:

• LMDZ6/trunk/libf/dyn3dmem/top_bound_loc.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/dyn3dmem/top_bound_loc.f90

@@ -8 +8 @@
   USE comvert_mod, ONLY: presnivs, preff, scaleheight
 
-  IMPLICIT NONE
-  !
-  include "dimensions.h"
+  USE dimensions_mod, ONLY: iim, jjm, llm, ndm
+IMPLICIT NONE
+  !
+
   include "paramet.h"
   include "comgeom2.h"
@@ -27 +28 @@
   !   ------
   !
-  !   Dissipation linéaire (ex top_bound de la physique)
+  !   Dissipation lin�aire (ex top_bound de la physique)
   !
   !=======================================================================