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.
#1822 (Wrong logical used in IF statement for tracer trends in traldf_iso) – NEMO

Opened 7 years ago

Closed 7 years ago

#1822 closed Defect (invalid)

Wrong logical used in IF statement for tracer trends in traldf_iso

Reported by: timgraham Owned by: timgraham
Priority: low Milestone:
Component: OCE Version: v3.6
Severity: Keywords:
Cc: davestorkey

Description

Context

In the case where Active tracer trends are requested but passive tracer trends are not we are seeing a lot of "You should not have seen this print" type error messages in the output file. These originate from TRA/traldf_iso.F90

Analysis

In the IF statement at line 333 l_trdtra is used with cdtype == "TRC". This eventually causes trd_trc to be called even though key_trdtrc is not defined.

         IF( l_trdtra .AND. cdtype == "TRC" )   THEN      ! save the horizontal component of diffusive trends for further diagnostics
            CALL trd_tra( kt, cdtype, jn, jptra_iso_x, ztrax )
            CALL trd_tra( kt, cdtype, jn, jptra_iso_y, ztray )
            CALL trd_tra( kt, cdtype, jn, jptra_iso_z1, ztraz )  ! This is the first part of the vertical component.
         ENDIF

Recommendation

Replace l_trdtra with l_trdtrc in this IF block.

Commit History (0)

(No commits)

Change History (1)

comment:1 Changed 7 years ago by timgraham

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

Closing as this is an error in a Met Office branch (not v3.6 Stable)

Note: See TracTickets for help on using tickets.