Ignore:
Timestamp:
Oct 28, 2024, 11:17:48 AM (4 days ago)
Author:
abarral
Message:

Turn comgeom.h comgeom2.h into modules

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dyn3d_common/interpost.f90

    r5272 r5281  
    44  subroutine interpost(q,qppm)
    55
    6    USE dimensions_mod, ONLY: iim, jjm, llm, ndm
     6   USE comgeom2_mod_h
     7  USE dimensions_mod, ONLY: iim, jjm, llm, ndm
    78USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
    89          ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
    … …  
    1213
    1314
    14   include "comgeom2.h"
    1515
    1616  ! Arguments
Note: See TracChangeset for help on using the changeset viewer.