- Timestamp:
- 2019-09-10T18:35:59+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/DYN/dynspg_ts.F90
r11521 r11529 647 647 IF( ll_isfcpl_cons ) THEN 648 648 zssh_frc(:,:) = zssh_frc(:,:) + risfcpl_cons_ssh(:,:) 649 END IF 650 ! 651 IF( ln_isfcpl .AND. ln_rstart .AND. kt == nit000 ) THEN 652 zssh_frc(:,:) = zssh_frc(:,:) + risfcpl_ssh(:,:) 649 653 END IF 650 654 !
Note: See TracChangeset
for help on using the changeset viewer.