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/phyaqua_mod.F90

    r5103 r5105  
    388388    CALL phys_state_var_end
    389389
    390     RETURN
     390
    391391  END SUBROUTINE iniaqua
    392392
    … …  
    504504    END IF
    505505
    506     RETURN
     506
    507507  END SUBROUTINE zenang_an
    508508
    … …  
    987987    ! IM end : verif profil SST: phy_sst
    988988
    989     RETURN
     989
    990990  END SUBROUTINE profil_sst
    991991
Note: See TracChangeset for help on using the changeset viewer.