Ignore:
Timestamp:
2020-11-17T10:21:55+01:00 (6 months ago)
Author:
gsamson
Message:

add ssh(:,:,Naa) init when ln_linssh=true in C1D config to avoid NaN crash in stpctl

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/C1D/step_c1d.F90

    r13237 r13802  
    122122                        CALL dyn_atf    ( kstp, Nbb, Nnn, Naa , uu, vv, e3t, e3u, e3v )  ! time filtering of "now" fields 
    123123      IF(.NOT.ln_linssh)CALL ssh_atf    ( kstp, Nbb, Nnn, Naa , ssh )                    ! time filtering of "now" sea surface height 
     124      IF( kstp == nit000 .AND. ln_linssh) THEN 
     125         ssh(:,:,Naa) = ssh(:,:,Nnn)  ! init ssh after in ln_linssh case 
     126      ENDIF 
    124127      ! 
    125128      ! Swap time levels 
Note: See TracChangeset for help on using the changeset viewer.