Changeset 8216


Ignore:
Timestamp:
2017-06-26T12:40:15+02:00 (3 years ago)
Author:
clne
Message:

Fix incorrect comment

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_Surge_Modelling/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r6389 r8216  
    241241      IF( ln_blk_core     ) THEN   ;   nsbc = jp_core    ; icpt = icpt + 1   ;   ENDIF       ! CORE bulk            formulation 
    242242      IF( ln_blk_mfs      ) THEN   ;   nsbc = jp_mfs     ; icpt = icpt + 1   ;   ENDIF       ! MFS  bulk            formulation 
    243       IF( ln_sbcsurge     ) THEN   ;   nsbc = jp_sbcsurge; icpt = icpt + 1   ;   ENDIF       ! MFS  bulk            formulation 
     243      IF( ln_sbcsurge     ) THEN   ;   nsbc = jp_sbcsurge; icpt = icpt + 1   ;   ENDIF       ! Surge                formulation 
    244244      IF( ll_purecpl      ) THEN   ;   nsbc = jp_purecpl ; icpt = icpt + 1   ;   ENDIF       ! Pure Coupled         formulation 
    245245      IF( cp_cfg == 'gyre') THEN   ;   nsbc = jp_gyre                        ;   ENDIF       ! GYRE analytical      formulation 
Note: See TracChangeset for help on using the changeset viewer.