Ignore:
Timestamp:
2019-10-29T12:00:04+01:00 (12 months ago)
Author:
mathiot
Message:

rm useless USE statement, option compatibility test + minor changes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/DOM/domain.F90

    r11553 r11823  
    2626   !!---------------------------------------------------------------------- 
    2727   USE oce            ! ocean variables 
    28    USE isfstp 
    2928   USE dom_oce        ! domain: ocean 
    3029   USE sbc_oce        ! surface boundary condition: ocean 
     
    449448#endif 
    450449      ! 
    451       ! need to know ln_isfcpl for istate (restart extrapolation) 
    452       ! and for domvvl_init (ssh extrapolation when recompute e3 variable 
    453       CALL isf_nam 
    454       ! 
    455450   END SUBROUTINE dom_nam 
    456451 
Note: See TracChangeset for help on using the changeset viewer.