- Timestamp:
- 2021-05-06T17:42:46+02:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE/IOM/restart.F90
r14239 r14800 424 424 ENDIF 425 425 ! 426 #if defined key_RK3 427 ssh(:,:,Kmm) = 0._wp !* RK3: set Kmm to 0 for AGRIF 428 #else 429 ssh(:,:,Kmm) = ssh(:,:,Kbb) !* MLF: set now values from to before ones 430 #endif 431 ENDIF 432 ! 426 ssh(:,:,Kmm) = ssh(:,:,Kbb) !* set now values from to before ones 427 ENDIF 428 ! 429 !JC: line below ??? 433 430 ! !==========================! 434 431 ssh(:,:,Kaa) = 0._wp !== Set to 0 for AGRIF ==!
Note: See TracChangeset
for help on using the changeset viewer.