Changeset 9725
- Timestamp:
- 2018-06-01T18:13:23+02:00 (7 years ago)
- Location:
- NEMO/trunk/src/ICE
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/ICE/icestp.F90
r9653 r9725 264 264 ENDIF 265 265 CALL ice_var_glo2eqv 266 CALL ice_var_agg( 2)266 CALL ice_var_agg(1) 267 267 ! 268 268 CALL ice_forcing_init ! set ice-ocean and ice-atm. coupling parameters -
NEMO/trunk/src/ICE/icevar.F90
r9604 r9725 106 106 ato_i(:,:) = 1._wp - at_i(:,:) ! open water fraction 107 107 108 ! The following fields are calculated for diagnostics and outputs only 109 ! ==> Do not use them for other purposes 108 110 IF( kn > 1 ) THEN 109 111 !
Note: See TracChangeset
for help on using the changeset viewer.