Ignore:
Timestamp:
2021-03-01T18:09:46+01:00 (4 months ago)
Author:
dancopsey
Message:

Remove sublimation and snow precip from surface energy balance

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/UKMO/NEMO_4.0.4_penetrating_solar/src/OCE/SBC/sbccpl.F90

    r14420 r14562  
    18851885         ! Get the sea ice non solar heat flux from conductive, melting and sublimation fluxes 
    18861886         IF( TRIM(sn_rcv_iceflx%cldes) == 'coupled' ) THEN 
    1887             zqns_ice(:,:,:) = qml_ice(:,:,:) + qcn_ice(:,:,:) + evap_ice(:,:,:) * rLsub 
     1887            zqns_ice(:,:,:) = qml_ice(:,:,:) + qcn_ice(:,:,:) 
    18881888         ELSE 
    18891889            zqns_ice(:,:,:) = 0._wp 
Note: See TracChangeset for help on using the changeset viewer.