Changeset 5280 for LMDZ6/trunk/libf/dyn3d_common/gradiv2.f90

Timestamp:

Oct 28, 2024, 10:47:48 AM (4 days ago)

Author:

abarral

Message:

Turn comdissip.h, comdissipn.h, comdissnew.h into modules

File:

• LMDZ6/trunk/libf/dyn3d_common/gradiv2.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/dyn3d_common/gradiv2.f90

@@ -16 +16 @@
   !
   !
+  USE comdissipn_mod_h
   USE dimensions_mod, ONLY: iim, jjm, llm, ndm
 USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
@@ -24 +25 @@
 
   INCLUDE "comgeom.h"
-  INCLUDE "comdissipn.h"
   !
   ! ........    variables en arguments      ........