#include <oxstd.h>

#import "../code/sim_pcgive"

main()
{
	decl cm = 1000, time = timer();
	decl pvalue = <0.1,0.05,0.01>, dgp = <80,800,8>;

	format(1000);
	
	for (decl i = 0; i < sizerc(dgp); ++i)
	{
		for (decl j = 0; j < sizerc(pvalue); ++j)
		{
			decl exp = new PcGiveExp("HP", dgp[i]);

			exp.Autometrics(pvalue[j], "none", 0);
			exp.AutometricsSet("pvalue_tests", 0);

			exp.Run(cm);
			delete exp;
		}
	}
	for (decl i = 0; i < sizerc(dgp); ++i)
	{
		for (decl j = 0; j < sizerc(pvalue); ++j)
		{
			decl exp = new PcGiveExp("HP", dgp[i]);

			exp.Autometrics(pvalue[j], "none", 0);
			exp.AutometricsSet("pvalue_tests", 0);
			exp.AutometricsSet("backtesting", "none");

			exp.Run(cm);
			delete exp;
		}
	}
	for (decl i = 0; i < sizerc(dgp); ++i)
	{
		for (decl j = 0; j < sizerc(pvalue); ++j)
		{
			decl exp = new PcGiveExp("HP", dgp[i]);

			exp.Autometrics(pvalue[j], "none", 0);
			exp.AutometricsSet("pvalue_tests", 0);
			exp.AutometricsSet("backtesting", "current gum");

			exp.Run(cm);
			delete exp;
		}
	}
	println("Total time: ", timespan(time));
}