Changeset 5362


Ignore:
Timestamp:
Dec 2, 2024, 5:29:16 PM (7 hours ago)
Author:
abarral
Message:

(fix previous) remove nonexisting imported vars

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dyn3dmem/mod_hallo.f90

    r5285 r5362  
    250250  subroutine Register_SwapField(FieldS,FieldR,ij,ll,jj_Nb_New,a_request)
    251251    USE dimensions_mod, ONLY: iim, jjm, llm, ndm
    252     USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
    253             ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
     252    USE paramet_mod_h
    254253      implicit none
    255254
    … …  
    300299  subroutine Register_SwapFieldHallo(FieldS,FieldR,ij,ll,jj_Nb_New,Up,Down,a_request)
    301300    USE dimensions_mod, ONLY: iim, jjm, llm, ndm
    302     USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
    303             ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
     301    USE paramet_mod_h
    304302      implicit none
    305303   
    … …  
    10371035    USE parallel_lmdz
    10381036    USE dimensions_mod, ONLY: iim, jjm, llm, ndm
    1039     USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
    1040             ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
     1037    USE paramet_mod_h
    10411038      IMPLICIT NONE
    10421039   
Note: See TracChangeset for help on using the changeset viewer.