anchor.diff:      ! Intrinsic functions:
       intrinsic random_number, cpu_time
       ! ..
  -    ! Allocate arraays
  +    ! Allocate arrays:
       allocate( x(len), y(len) )
       ! ..
       do i = 1, len
  
positive.code:       end function sdot
      end interface
      ! ..
      ! Scalar Arguments
      integer, intent(in) :: iterations, len
      ! ..
      ! Local scalars:
  
negative.code:   ! ..
    ! Runs a benchmark.
    !
    ! @param {integer} iterations - number of iterations
    ! @param {integer} len - array length
    ! @return {double} elapsed time in seconds
    ! ..
    double precision function benchmark( iterations, len )
  