Changeset 9656 for NEMO/trunk/src/OCE/ASM
- Timestamp:
- 2018-05-28T11:53:14+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/ASM/asminc.F90
r9598 r9656 826 826 REAL(wp) :: zincwgt ! IAU weight for current time step 827 827 #if defined key_si3 828 REAL(wp), DIMENSION(jpi,jpj) :: zofrld, zohicif, zseaicendg, zhicifinc ! LIM828 REAL(wp), DIMENSION(jpi,jpj) :: zofrld, zohicif, zseaicendg, zhicifinc 829 829 REAL(wp) :: zhicifmin = 0.5_wp ! ice minimum depth in metres 830 830 #endif … … 847 847 ENDIF 848 848 ! 849 ! Sea-ice : LIM-3 case849 ! Sea-ice : SI3 case 850 850 ! 851 851 #if defined key_si3 … … 896 896 neuler = 0 ! Force Euler forward step 897 897 ! 898 ! Sea-ice : LIM-3 case898 ! Sea-ice : SI3 case 899 899 ! 900 900 #if defined key_si3
Note: See TracChangeset
for help on using the changeset viewer.