Changeset 14145
- Timestamp:
- 2020-12-10T12:42:12+01:00 (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/IOM/restart.F90
r14139 r14145 390 390 ENDIF 391 391 ! 392 ssh(:,:,Kmm) = ssh(:,:,Kbb) !* set now values from to before ones 393 ssh(:,:,Kaa) = 0._wp 394 ENDIF 392 ssh(:,:,Kmm) = ssh(:,:,Kbb) !* set now values from to before ones 393 ENDIF 394 ! 395 ! !==========================! 396 ssh(:,:,Kaa) = 0._wp !== Set to 0 for agrif ==! 397 ! !==========================! 395 398 ! 396 399 END SUBROUTINE rst_read_ssh
Note: See TracChangeset
for help on using the changeset viewer.