// Code for 1-cut
#include <oxstd.h>
#include <oxprob.h>
#include <oxdraw.h>

#import "../code/sim_1cut"

main()
{
	decl pvals = <0.01;0.001>, pval;
	decl ct = 75, n, time = timer(), cm = 10000;

	foreach (pval in pvals)
	{
		for (n = 1; n <= 10; ++n)
		{
			Run_1cut(cm, ones(n, 1), 10, ct, pval, TRUE, TRUE, FALSE, 0.4 * sqrt(n), 5, FALSE);
		}
	}
	foreach (pval in pvals)
	{
		for (n = 1; n <= 10; ++n)
		{
			Run_1cut(cm, ones(n, 1), 10, ct, pval, TRUE, TRUE, FALSE, 0.4 * sqrt(n), 5, FALSE, "IIS");
		}
	}
	println("Total time:", timespan(time));
}