Mercurial > repos > rhope

comparison binary_trees.rhope @ 155:d59611dcec71

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Small fix to binary trees benchmark
author Mike Pavone <pavone@retrodev.com>
date Tue, 21 Dec 2010 04:12:11 +0000
parents f4fd8962c385
children
comparison
equal deleted inserted replaced
154:29b479a2ce48 155:d59611dcec71
59 ]Append["\t trees of depth "] 59 ]Append["\t trees of depth "]
60 ]Append[String[current]] 60 ]Append[String[current]]
61 ]Append["\t check: "] 61 ]Append["\t check: "]
62 ]Append[String[sum]]] 62 ]Append[String[sum]]]
63 { 63 {
64 If[[current]=[max]] 64 If[[[current]+[2]]>[max]]
65 { 65 {
66 out <- 1 66 out <- 1
67 }{ 67 }{
68 out <- Test Sizes[[current]+[2], max, [iterations]/[4]] 68 out <- Test Sizes[[current]+[2], max, [iterations]/[4]]
69 } 69 }