New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 15697 – NEMO

Changeset 15697


Ignore:
Timestamp:
2022-02-07T13:53:17+01:00 (2 years ago)
Author:
timgraham
Message:

Added an lbc_lnk to make code restartable

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/UKMO/NEMO_4.0.4_icesheet_and_river_coupling/src/OCE/SBC/sbcrnf.F90

    r14940 r15697  
    162162                ENDIF 
    163163            ENDIF 
     164            CALL lbc_lnk_multi('sbcrnf',rnf,'T',1._wp,fwficb,'T',1._wp) 
    164165            CALL iom_put( 'iceberg_cea'  , fwficb(:,:)  )          ! output iceberg flux 
    165166            CALL iom_put( 'hflx_icb_cea' , fwficb(:,:) * rLfus )   ! output Heat Flux into Sea Water due to Iceberg Thermodynamics --> 
Note: See TracChangeset for help on using the changeset viewer.