Opened 5 months ago

Closed 2 months ago

Last modified 2 months ago

#2533 closed Bug (fixed)

avt_evd is undefined when enhanced vertical diffusion is not used

Reported by: hadcv Owned by: hadcv
Priority: low Milestone: Unscheduled
Component: TRD Version: trunk
Severity: minor Keywords: trd_tra
Cc: Branch review: failed
MP ready?: no Task progress: Unspecified

Description

avt_evd is undefined when ln_zdfevd == .FALSE., causing uninitialised values to be output by the "ttrd_evd" diagnostic.

Fix

Initialise avt_evd in trdtrd.F90:

IF( .NOT. ALLOCATED( trdtx ) ) THEN      ! allocate trdtra arrays
   IF( trd_tra_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'trd_tra : unable to allocate arrays' )
+  avt_evd(:,:,:) = 0._wp
ENDIF

Commit History (2)

ChangesetAuthorTimeChangeLog
14175hadcv2020-12-15T19:25:24+01:00

#2533: Fix uninitialised values in ttrd_evd diagnostic when ln_zdfevd = .false.

14174hadcv2020-12-15T19:25:18+01:00

#2533: Fix uninitialised values in ttrd_evd diagnostic when ln_zdfevd = .false.

Change History (3)

comment:1 Changed 2 months ago by hadcv

In 14174:

#2533: Fix uninitialised values in ttrd_evd diagnostic when ln_zdfevd = .false.

comment:2 Changed 2 months ago by hadcv

In 14175:

#2533: Fix uninitialised values in ttrd_evd diagnostic when ln_zdfevd = .false.

comment:3 Changed 2 months ago by hadcv

  • Resolution set to fixed
  • Status changed from new to closed
Last edited 2 months ago by hadcv (previous) (diff)
Note: See TracTickets for help on using tickets.