Opened 6 years ago

Closed 6 years ago

#1445 closed Bug (fixed)

jpi used instead of jpj in iom.F90

Reported by: timgraham Owned by: timgraham
Priority: low Milestone:
Component: OCE Version: release-3.6
Severity: Keywords:
Cc:

Description

In subroutine set_grid (in iom.F90) the following line is called if ln_mskland = True.

CASE('V')   ;   zmask(:,2:jpjm1,:) = tmask(:,2:jpjm1,:) + tmask(:,3:jpi,:)   ;   CALL lbc_lnk( zmask, 'V', 1. )

This should be:

CASE('V')   ;   zmask(:,2:jpjm1,:) = tmask(:,2:jpjm1,:) + tmask(:,3:jpj,:)   ;   CALL lbc_lnk( zmask, 'V', 1. )

Commit History (1)

ChangesetAuthorTimeChangeLog
5043timgraham2015-01-26T10:23:43+01:00

Fix for ticket #1445 - (Use jpj instead of jpi)

Change History (1)

comment:1 Changed 6 years ago by timgraham

  • Resolution set to fixed
  • Status changed from new to closed

Fixed at r5043

Note: See TracTickets for help on using tickets.