Ignore:
Timestamp:
Aug 2, 2024, 9:58:25 PM (7 weeks 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/gr_u_scal_loc.f90

    r5136 r5159  
    55  !%W%    %G%
    66  !=======================================================================
    7   !
     7
    88  !   Author:    Frederic Hourdin      original: 11/11/92
    99  !   -------
    10   !
     10
    1111  !   Subject:
    1212  !   ------
    13   !
     13
    1414  !   Method:
    1515  !   --------
    16   !
     16
    1717  !   Interface:
    1818  !   ----------
    19   !
     19
    2020  !  Input:
    2121  !  ------
    22   !
     22
    2323  !  Output:
    2424  !  -------
    25   !
     25
    2626  !=======================================================================
    2727  USE parallel_lmdz
    2828  USE lmdz_comgeom
    2929
     30  USE lmdz_dimensions, ONLY: iim, jjm, llm, ndm
     31  USE lmdz_paramet
    3032  IMPLICIT NONE
    3133  !-----------------------------------------------------------------------
    … …  
    3335  !   ---------------
    3436
    35   INCLUDE "dimensions.h"
    36   INCLUDE "paramet.h"
     37
     38
    3739
    3840  !   Arguments:
Note: See TracChangeset for help on using the changeset viewer.