Ignore:
Timestamp:
Aug 2, 2024, 9:58:25 PM (3 months ago)
Author:
abarral
Message:

Put dimensions.h and paramet.h into modules

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/caladvtrac_loc.f90

    r5134 r5159  
    11! $Id: caladvtrac_p.F 1299 2010-01-20 14:27:21Z fairhead $
    22
    3 !
    4 !
     3
     4
    55SUBROUTINE caladvtrac_loc(q, pbaru, pbarv, &
    66        p, masse, dq, teta, &
    … …  
    1717  USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_DEBUGIO
    1818
     19  USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm
     20  USE lmdz_paramet
    1921  IMPLICIT NONE
    20   !
     22
    2123  ! Auteurs:   F.Hourdin , P.Le Van, F.Forget, F.Codron
    22   !
     24
    2325  ! F.Codron (10/99) : ajout humidite specifique pour eau vapeur
    2426  !=======================================================================
    25   !
     27
    2628  !   Shema de  Van Leer
    27   !
     29
    2830  !=======================================================================
    2931
    30   INCLUDE "dimensions.h"
    31   INCLUDE "paramet.h"
     32
     33
    3234
    3335  !   Arguments:
Note: See TracChangeset for help on using the changeset viewer.