Changeset 5272 for LMDZ6/trunk/libf/phylmd/Dust/coarsemission.f90

Timestamp:

Oct 24, 2024, 5:53:15 PM (33 hours ago)

Author:

abarral

Message:

Turn paramet.h into a module

File:

• LMDZ6/trunk/libf/phylmd/Dust/coarsemission.f90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/Dust/coarsemission.f90

@@ -32 +32 @@
    ! USE phytracr_spl_mod, ONLY : nbreg_dust, nbreg_ind, nbreg_bb
   USE dimensions_mod, ONLY: iim, jjm, llm, ndm
+USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
+          ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
 IMPLICIT NONE
 
@@ -38 +40 @@
   INCLUDE "chem_spla.h"
   INCLUDE "YOMCST.h"
-  INCLUDE "paramet.h"
+
 
   !============================== INPUT ==================================