private void test(int nodes, int constants, int rewrites)
{
CalculatorProfiler.InitialiseRandom();
Racr.AstNode c1 = CalculatorProfiler.ProfileRacrNet(nodes, constants, rewrites, false);
CalculatorProfiler.InitialiseRandom();
Object c2 = CalculatorProfiler.ProfileRacrScheme(nodes, constants, rewrites, false);
Assert.AreEqual(
c1.PrintAst(),
@"(call-with-string-output-port
(lambda (port)
(print-ast {0} (list) port)))" .Eval(c2));
Assert.AreEqual(c1.Eval(), (double)"(=eval {0})".Eval(c2));
}
