Unrollings are reported separately from successes.

This commit is contained in:
Vincent St-Amour 2011-12-13 14:01:03 -05:00
parent 742fb7844c
commit b4e4797e6a

View File

@ -196,7 +196,7 @@
(success? evt))))
site))))
(define n-successes (length (filter success? group)))
(define n-successes (- (length (filter success? group)) n-unrollings))
(define n-failures (length (filter failure? group)))
(define n-out-of-fuels (length (filter out-of-fuel? group)))