Changeset 9040
- Timestamp:
- 2017-12-14T12:22:46+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/OBS/diaobs.F90
r9023 r9040 672 672 CYCLE 673 673 ELSE 674 #if defined key_cice 674 #if defined key_cice || defined key_lim3 675 675 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' ) 681 678 #endif 682 679 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.