id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
637	diagnostics bug	jcwarner	arango	"not sure why this was not seen before. but most likely because the idiag index was not exceeded. There is a bug in step3d_uv, line 937 needs to be in an idiag loop the code now has:

# if defined DIAGNOSTICS_UV && defined MASKING
          DO k=1,N(ng)
            DO i=Istr,Iend
              DiaV3wrk(i,j,k,idiag)=DiaV3wrk(i,j,k,idiag)*vmask(i,j)
            END DO
          END DO
# endif

but it really needs to be:

# if defined DIAGNOSTICS_UV && defined MASKING
          DO k=1,N(ng)
            DO i=Istr,Iend
              DO idiag=1,NDM3d
                DiaV3wrk(i,j,k,idiag)=DiaV3wrk(i,j,k,idiag)*vmask(i,j)
              END DO
            END DO
          END DO
# endif

-john"	bug	new	minor	Release ROMS/TOMS 3.7	Nonlinear	3.7