Changeset 5281 for LMDZ6/trunk/libf/dyn3dmem/addfi_loc.f90

Timestamp:

Oct 28, 2024, 11:17:48 AM (4 days ago)

Author:

abarral

Message:

Turn comgeom.h comgeom2.h into modules

File:

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

LMDZ6/trunk/libf/dyn3dmem/addfi_loc.f90

@@ -11 +11 @@
   USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
           ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
+  USE comgeom_mod_h
   IMPLICIT NONE
   !
@@ -46 +47 @@
   !-----------------------------------------------------------------------
   !
-  !    0.  Declarations :
-  !    ------------------
-  include "comgeom.h"
-  !
   !    Arguments :
   !    -----------