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 9040 – NEMO

Changeset 9040


Ignore:
Timestamp:
2017-12-14T12:22:46+01:00 (6 years ago)
Author:
timgraham
Message:

Fix in diaobs

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/OBS/diaobs.F90

    r9023 r9040  
    672672                  CYCLE 
    673673               ELSE 
    674 #if defined key_cice 
     674#if defined key_cice || defined key_lim3 
    675675                  zsurfvar(:,:) = fr_i(:,:) 
    676 #elif defined key_lim2 || defined key_lim3 
    677                   zsurfvar(:,:) = 1._wp - frld(:,:) 
    678 #else 
    679                CALL ctl_stop( ' Trying to run sea-ice observation operator', & 
    680                   &           ' but no sea-ice model appears to have been defined' ) 
     676                  CALL ctl_stop( ' Trying to run sea-ice observation operator', & 
     677                     &           ' but no sea-ice model appears to have been defined' ) 
    681678#endif 
    682679               ENDIF 
Note: See TracChangeset for help on using the changeset viewer.