Changeset 13276


Ignore:
Timestamp:
2020-07-09T09:47:18+02:00 (4 weeks ago)
Author:
mathiot
Message:

ticket #2494 and #2375: wrong point type inn lbc_lnk_icb for umask_e and vmask_e (see ticket #2492)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2020/tickets_2494_2375/src/OCE/ICB/icbini.F90

    r13265 r13276  
    246246      vmask_e(:,:) = 0._wp   ;   vmask_e(1:jpi,1:jpj) = vmask(:,:,1) 
    247247      CALL lbc_lnk_icb( 'icbini', tmask_e, 'T', +1._wp, 1, 1 ) 
    248       CALL lbc_lnk_icb( 'icbini', umask_e, 'T', +1._wp, 1, 1 ) 
    249       CALL lbc_lnk_icb( 'icbini', vmask_e, 'T', +1._wp, 1, 1 ) 
     248      CALL lbc_lnk_icb( 'icbini', umask_e, 'U', +1._wp, 1, 1 ) 
     249      CALL lbc_lnk_icb( 'icbini', vmask_e, 'V', +1._wp, 1, 1 ) 
    250250 
    251251      ! definition of extended lat/lon array needed by icb_bilin_h 
Note: See TracChangeset for help on using the changeset viewer.