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 3414 for branches/2012/dev_r3385_NOCS04_HAMF/NEMOGCM/NEMO/LIM_SRC_2/limsbc_2.F90 – NEMO

Ignore:
Timestamp:
2012-06-15T14:53:43+02:00 (12 years ago)
Author:
acc
Message:

Branch: dev_r3385_NOCS04_HAMF; #665. Stage 3 of 2012 development: First working version with (optionally) active embedding. Still some stability questions when running the LIM2-EVP, ORCA2 test-case with full embedding. Works with reduced (halved) timestep. Still investigating.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2012/dev_r3385_NOCS04_HAMF/NEMOGCM/NEMO/LIM_SRC_2/limsbc_2.F90

    r3402 r3414  
    470470      ENDIF 
    471471      IF( nn_ice_embd == 2 .AND.          &  ! full embedment (case 2) & no restart :  
    472          &   .NOT.ln_rstart ) THEN           ! deplete the initial ssh belew sea-ice area 
     472         &   .NOT.ln_rstart ) THEN           ! deplete the initial ssh below sea-ice area 
    473473         sshn(:,:) = sshn(:,:) - snwice_mass(:,:) * r1_rau0 
    474474         sshb(:,:) = sshb(:,:) - snwice_mass(:,:) * r1_rau0 
Note: See TracChangeset for help on using the changeset viewer.