anchor.diff:          real(kind=DP) :: absError, orig
           orig = this%setArg(env, x)
           absError = this%absError(env)
  -        ! shouldn't really be assigning here, but need to for compilation
  +        ! Shouldn't really be assigning here, but need to for compilation.
  +        ! Assignment doesn't affect result.
           orig = this%setArg(env, orig)
       end function
   
  
positive.code:         class(SelfConsistentEq), intent(in) :: this
          type(Environ), intent(inout) :: env
          integer :: error
      end function
  
      ! Return a bracket for the leftmost root of scEquation between argMin
      ! and argMax. If error = 1, no root was found.
      subroutine BracketRoot(scEquation, env, leftBracket, rightBracket, error)
          real(kind=DP), intent(out) :: leftBracket, rightBracket
          type(SelfConsistentEq), intent(in) :: scEquation
          type(Environ) :: env
          integer, intent(out) :: error
          integer :: minSteps, maxSteps, numSteps, n
  
negative.code:     function BisectionRoot(scEquation, env, leftBracket, rightBracket, error)
          real(kind=DP), intent(in) :: leftBracket, rightBracket
          integer, intent(out) :: error
          class(SelfConsistentEq), intent(in) :: scEquation
          type(Environ) :: env
          real(kind=DP) :: BisectionRoot, a, b, low, high, mid
          a = scEquation%absErrorWith(env, leftBracket)
  