Ignore:
Timestamp:
Jul 23, 2024, 7:14:34 PM (8 weeks ago)
Author:
abarral
Message:

Replace 1DUTILS.h by module lmdz_1dutils.f90
Replace 1DConv.h by module lmdz_old_1dconv.f90 (it's only used by old_* files)
Convert *.F to *.f90
Fix gradsdef.h formatting
Remove unnecessary "RETURN" at the end of functions/subroutines

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_cloudth.F90

    r5103 r5105  
    14771477
    14781478      END DO  ! From the loop on ngrid
    1479       return
     1479
    14801480
    14811481END SUBROUTINE cloudth_v6
    … …  
    18231823
    18241824
    1825 RETURN
     1825
    18261826
    18271827
    … …  
    22392239    qith(ind2)=MAX(0.,qi)
    22402240
    2241     RETURN
     2241
    22422242
    22432243END SUBROUTINE ICE_MPC_BL_CLOUDS
Note: See TracChangeset for help on using the changeset viewer.