Ignore:
Timestamp:
2017-09-15T20:07:33+02:00 (3 years ago)
Author:
clem
Message:

changes in style - part6 - more clarity (still not finished)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icethd_ent.F90

    r8486 r8531  
    3333   PRIVATE 
    3434 
    35    PUBLIC   ice_thd_ent         ! called by icethd and icethd_lac 
     35   PUBLIC   ice_thd_ent         ! called by icethd and icethd_do 
    3636 
    3737   !!---------------------------------------------------------------------- 
     
    130130 
    131131      ! --- diag error on heat remapping --- ! 
    132       ! comment: if input h_i_old and eh_i_old are already multiplied by a_i (as in icethd_lac),  
     132      ! comment: if input h_i_old and eh_i_old are already multiplied by a_i (as in icethd_do),  
    133133      ! then we should not (* a_i) again but not important since this is just to check that remap error is ~0 
    134134      DO ji = 1, nidx 
Note: See TracChangeset for help on using the changeset viewer.