Changeset 13053


Ignore:
Timestamp:
2020-06-05T10:19:47+02:00 (6 months ago)
Author:
emanuelaclementi
Message:

#2155 Bug fix in sbcwave in branch dev_r12702_ASINTER-02_emanuelaclementi_Waves

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2020/dev_r12702_ASINTER-02_emanuelaclementi_Waves/src/OCE/SBC/sbcwave.F90

    r12991 r13053  
    318318         ! 
    319319         IF( jpfld == 4 .OR. ln_wave_test )   & 
    320             &      CALL sbc_stokes( kt )                 ! Calculate only if all required fields are read 
     320            &      CALL sbc_stokes( Kmm )                 ! Calculate only if all required fields are read 
    321321            !                                            ! or in wave test case 
    322322         !  !                                            ! In coupled case the call is done after (in sbc_cpl) 
Note: See TracChangeset for help on using the changeset viewer.