Ignore:
Timestamp:
2018-07-10T16:04:04+02:00 (2 years ago)
Author:
clem
Message:

cosmetics (quater)

File:
1 edited

Legend:

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

    r9913 r9916  
    427427 
    428428      ! SIMIP diagnostics 
    429       qcn_ice_bot(:,:) = 0._wp ; qcn_ice_top(:,:) = 0._wp 
    430       t_si(:,:,:) = rt0       ! temp at the ice-snow interface 
     429      qcn_ice_bot(:,:,:) = 0._wp ; qcn_ice_top(:,:,:) = 0._wp ! conductive fluxes 
     430      t_si       (:,:,:) = rt0   ! temp at the ice-snow interface 
    431431 
    432432      tau_icebfr(:,:)   = 0._wp   ! landfast ice param only (clem: important to keep the init here) 
Note: See TracChangeset for help on using the changeset viewer.