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 841 for trunk/NEMO/OPA_SRC/SBC/flx_bulk_daily.h90 – NEMO

Ignore:
Timestamp:
2008-03-11T15:50:54+01:00 (16 years ago)
Author:
rblod
Message:

Light changes in SBC routines to use classical CLIO bulks with LIM3

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OPA_SRC/SBC/flx_bulk_daily.h90

    r719 r841  
    6262      USE blk_oce         ! bulk variable 
    6363      USE bulk            ! bulk module 
     64      USE ice_oce 
    6465 
    6566      !! * arguments 
    … …  
    187188 
    188189      CALL blk(kt) 
     190 
     191#if defined key_lim3 
     192      tatm_ice(:,:) = tatm(:,:) 
     193#endif 
    189194       
    190195      CALL FLUSH(numout) 
Note: See TracChangeset for help on using the changeset viewer.