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.
#788 (dupplicate code in obc_ini) – NEMO

Opened 14 years ago

Closed 14 years ago

#788 closed Bug (fixed)

dupplicate code in obc_ini

Reported by: molines Owned by: nemo
Priority: high Milestone:
Component: OCE Version: v3.3
Severity: Keywords: OBC
Cc:

Description

In obc_ini, the following bloc of code is duplicated, thus introducing an error in the value of obcsurftot ...

      IF( lp_obc_west ) THEN ! ... West open boundary lateral surface
         DO ji = niw0, niw1
            DO jj = 1, jpj 
               obcsurftot = obcsurftot+hu(ji,jj)*e2u(ji,jj)*uwmsk(jj,1) * MAX(obctmsk(ji,jj),obctmsk(ji+1,jj) )
            END DO
         END DO
      END IF

Commit History (1)

ChangesetAuthorTimeChangeLog
2565rblod2011-01-20T20:07:44+01:00

Suppress duplicated code in obcini, see ticket #788

Change History (1)

comment:1 Changed 14 years ago by rblod

  • Resolution set to fixed
  • Status changed from new to closed
Note: See TracTickets for help on using tickets.