Ignore:
Timestamp:
Jul 24, 2024, 4:23:34 PM (4 months ago)
Author:
abarral
Message:

rename modules properly lmdz_*
move some unused files to obsolete/
(lint) uppercase fortran keywords

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r5116 r5117  
    3535!****************************************************************************************
    3636
    37   if (albsno0>=0.) THEN
     37  IF (albsno0>=0.) THEN
    3838     init(:)=albsno0
    3939     decay(:)=0.
    40   endif
     40  ENDIF
    4141
    4242  veget = 0.
Note: See TracChangeset for help on using the changeset viewer.