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