Changeset 9784


Ignore:
Timestamp:
2018-06-12T19:59:11+02:00 (2 years ago)
Author:
clem
Message:

cosmetics

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/ICE/iceupdate.F90

    r9782 r9784  
    386386      !!                  ***  ROUTINE ice_update_init  *** 
    387387      !!              
    388       !! ** Purpose :   ??? 
     388      !! ** Purpose :   allocate ice-ocean stress fields and read restarts 
     389      !!                containing the snow & ice mass 
    389390      !! 
    390391      !!------------------------------------------------------------------- 
     
    394395      ! 
    395396      IF(lwp) WRITE(numout,*) 
    396       IF(lwp) WRITE(numout,*) 'ice_update_init: ???? ' 
     397      IF(lwp) WRITE(numout,*) 'ice_update_init: ice-ocean stress init' 
    397398      IF(lwp) WRITE(numout,*) '~~~~~~~~~~~~~~~' 
    398399      ! 
Note: See TracChangeset for help on using the changeset viewer.