id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
129	Bug in thinner	Dave Offiler	Dave Offiler	"Axel reports that v1.1 has a bug in the thinner interpolation code ropp_io_thin_fixed.f90, which was also in v1.0. He had corrected this in his local v1.0 but it had not explicitly been brought it to the attention of the Development Team at the time.

The alleged incorrect code fragment is:

{{{
! Search for the pair of source levels just above & below the
! target level, allowing for ascending or descending profile.

        j = 2
        IF ( ascending ) THEN
          DO WHILE ( j < nLev .AND. Lev(j) < ThinLev(k) )
            j = j + 1
          END DO
          i = j - 1
        ELSE
          DO WHILE ( j < nLev-1 .AND. Lev(j) > ThinLev(k) )
            j = j + 1
          END DO
          i = j
          j = j + 1       <<<--- Axel changes to j = j - 1
        END IF
}}}

The same change is needed in both LOG (section 2.1)and LIN (Section 2.2)."	defect	closed	major	1.1	ropp_io	1.1	fixed	Thinner, interpolation