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/phylmd/readaerosolstrato.F90

    r5088 r5099  
    161161!--keep memory of previous month
    162162    mth_pre=mth_cur
    163 !
     163
    164164    IF (is_mpi_root.AND.is_omp_root) THEN
    165 !
     165
    166166    DEALLOCATE(tauaerstrat)
    167167    DEALLOCATE(tauaerstrat_mois)
    168168    DEALLOCATE(tauaerstrat_mois_glo)
    169 !
     169
    170170    ENDIF !-is_mpi_root and is_omp_root
    171171
Note: See TracChangeset for help on using the changeset viewer.