Opened 6 years ago

Closed 6 years ago

Last modified 3 years ago

#1385 closed Bug (fixed)

trc.F90; gtru and gtrv incorrectly dimensioned in nemo_3_5_beta

Reported by: PlankTOM Owned by: cetlod
Priority: low Milestone: 2015 release-3.6
Component: OCE Version: release-3.5
Severity: Keywords: 2015 release-3.6
Cc:

Description

gtru and gtrv should be allocated space by jptra and not jpk:

ALLOCATE( trn(jpi,jpj,jpk,jptra), trb(jpi,jpj,jpk,jptra), tra(jpi,jpj,jpk,jptra), &

& gtru(jpi,jpj,jptra) , gtrv(jpi,jpj,jptra) , &

& cvol(jpi,jpj,jpk) , rdttrc(jpk) , trai(jptra) , &
& ctrcnm(jptra) , ctrcln(jptra) , ctrcun(jptra) , &
& ln_trc_ini(jptra) , ln_trc_wri(jptra)

The present code leads to cvol being over-written if jptr>jpk

Commit History (0)

(No commits)

Change History (5)

comment:1 Changed 6 years ago by clevy

  • Milestone set to 2015 nemo_v3_6_STABLE
  • Owner changed from NEMO team to cetlod

comment:2 Changed 6 years ago by cbricaud

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

bug already fixed in trunk

comment:3 Changed 4 years ago by nicolasmartin

  • Keywords 2015 nemo_v3_6* added

comment:4 Changed 3 years ago by nemo

  • Keywords release-3.6* added; nemo_v3_6* removed

comment:5 Changed 3 years ago by nemo

  • Keywords release-3.6 added; release-3.6* removed
Note: See TracTickets for help on using tickets.