New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 5159 – NEMO

Changeset 5159


Ignore:
Timestamp:
2015-03-23T13:47:00+01:00 (8 years ago)
Author:
davestorkey
Message:

Bug fix.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2015/dev_r5021_UKMO1_CICE_coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

    r5119 r5159  
    704704      REAL(wp) ::   zcdrag = 1.5e-3        ! drag coefficient 
    705705      REAL(wp) ::   zzx, zzy               ! temporary variables 
    706       REAL(wp), POINTER, DIMENSION:,:) ::   ztx, zty  
     706      REAL(wp), POINTER, DIMENSION(:,:) ::   ztx, zty  
    707707      !!---------------------------------------------------------------------- 
    708708      ! 
Note: See TracChangeset for help on using the changeset viewer.