anchor.diff:    20
     (trivial-garbage:gc :full t)
     (let* ((a9a-forest
  -           (make-forest 2 a9a-dim a9a-datamatrix a9a-target
  +           (make-forest 2 a9a-datamatrix a9a-target
                           :n-tree 500 :bagging-ratio 0.1 :min-region-samples 5 :n-trial 10 :max-depth 10))
            (a9a-refine-dataset (make-refine-dataset a9a-forest a9a-datamatrix))
            (a9a-refine-test (make-refine-dataset a9a-forest a9a-datamatrix-test))
  
positive.code:     20
      (trivial-garbage:gc :full t)
      (let ((a9a-forest
              (make-forest 2 a9a-dim a9a-datamatrix a9a-target
                           :n-tree 500 :bagging-ratio 0.1 :min-region-samples 5 :n-trial 10 :max-depth 10)))
        (test-forest a9a-forest a9a-datamatrix-test a9a-target-test)))
     84.07d0
  
negative.code:     20
      (trivial-garbage:gc :full t)
      (let* ((letter-forest
               (make-forest letter-n-class letter-datamatrix letter-target
                            :n-tree 500 :bagging-ratio 0.1 :min-region-samples 5 :n-trial 10 :max-depth 10))
             (letter-refine-dataset (make-refine-dataset letter-forest letter-datamatrix))
             (letter-refine-test (make-refine-dataset letter-forest letter-datamatrix-test))
  