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.
#1445 (jpi used instead of jpj in iom.F90) – NEMO

Opened 9 years ago

Closed 9 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: v3.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 9 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.