Opened 14 years ago

Closed 14 years ago

#412 closed bug (Fixed)

Corrected typo in inp_par.F for passive inert tracers

Reported by: arango Owned by: arango
Priority: major Milestone: Release ROMS/TOMS 3.4
Component: Nonlinear Version: 3.4
Keywords: Cc:

Description

Corrected a type in inp_par.F around line 1660 when T_PASSIVE is activated. We need to have instead:

             DO ng=1,Ngrids
               DO itrc=1,NPT
                 i=inert(itrc)
                 LtracerSrc(i,ng)=Ltracer(i,ng)
               END DO
             END DO

Also corrected a typo in ana_psource.F around line 267, we need to have instead:

!$OMP BARRIER

Many thanks to Alessandro Coluccelli for reporting these typos.

Change History (1)

comment:1 by arango, 14 years ago

Resolution: Fixed
Status: newclosed
Note: See TracTickets for help on using tickets.