Ignore:
Timestamp:
Jul 22, 2024, 9:29:09 PM (4 months ago)
Author:
abarral
Message:

Replace most uses of CPP_DUST by the corresponding logical defined in lmdz_cppkeys_wrapper.F90
Convert several files from .F to .f90 to allow Dust to compile w/o rrtm/ecrad
Create lmdz_yoerad.f90
(lint) Remove "!" on otherwise empty line

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/friction_loc.F

    r5082 r5099  
    1 !
     1
    22! $Id: friction_p.F 1299 2010-01-20 14:27:21Z fairhead $
    3 !
     3
    44c=======================================================================
    55      SUBROUTINE friction_loc(ucov,vcov,pdt)
    … …  
    1616
    1717!=======================================================================
    18 !
     18
    1919!   Friction for the Newtonian case:
    2020!   --------------------------------
Note: See TracChangeset for help on using the changeset viewer.