globals [ glob1 result ]
to benchmark
set result 0.0
random-seed 362
;; note we setup before resetting the timer, because;; we only want to benchmark the go stuff
setup
reset-timer
repeat 1000 [ go ]
set result timer
endto setup
ca
cro 1000 [ ht ]
set glob1 0
endto go
ask turtles [
let a glob1
let b a
let c b
]
end