# /* vim: set filetype=awk : */ -*- awk -*-

# #---- [demos.awk] ------------------------------------------
function demo(n) {
	if (n==16) return demo16(); 
	if (n==15) return demo15(); 
	if (n==14) return demo14(); 
	if (n==13) return demo13(); 
	if (n==12) return demo12(); 
	if (n==11) return demo11(); 
	if (n==9)  return demo9(); 
	if (n==8)  return demo8(); 
	if (n==7)  return demo7(); 
	if (n==6)  return demo6(); 
	if (n==5)  return demo5(); 
	if (n==4)  return demo4(); 
	if (n==3)  return demo3(); 
	if (n==2)  return demo2(); 
	if (n==1)  return demo1(); 
	demo999();
}
function demo999() {  
	sims(Spec,Repeats,Slots,Project)
}
function demo16() {
	set("s","$>a,<b,$c");
	saya("Spec",Spec);
}
function demo15() {
	print Total_risk("aTwist");
	print Effort("aTwist");
	print Total_defects("aTwist");
}
function demo14() {
	saya("Slots",Slots)
}
function demo13() {
	print Total_risk("aTwist");
	print Effort("aTwist");
	print Total_defects("aTwist");
	saya("Drf",Drf)
}
function demo12() {
	print Total_risk("nominal");
	print Effort("nominal");
	print Total_defects("nominal");
	#saya("Coqual",Coqual)
}
function demo11() {
	print Total_risk("worries");
	print Effort("worries");
	print Total_defects("worries");
}
function demo9() {
	print Total_defects("aTwist",1);	
}
function demo8( t) {
		table(t,
			"c, prec,flex,resl,team,pmat",   
			"xh,0.81, 1,  0.71,0.86,0.63," \
			"vh,0.9,  1,  0.84,0.92,0.79, " \
			"h, 0.95, 1,  0.92,0.96,0.9 , " \
			"n,1,1,1,1,1,             " \
			"l,1.12,1,1.21,1.09,1.3,  " \
			"vl,1.24,1,1.41,1.18,1.58 ");
	table(t,
			"c,rely,data,ruse,docu,cplx,time,stor,pvol,acap,pcap,pcon,aexp,plex,ltex,tool,site,sced",
			"xh,   ,    ,1.02,    ,1.41,1.2 ,1.15,1.22,    ,    ,    ,    ,    ,    ,    ,0.85,   ," \
			"vh,0.69,1.1,1.01,0.85,1.27,1.13,1.1,1.15,0.9,0.76,0.77,0.88,0.86,0.81,0.8,0.9,0.84,"\
			"h, 0.85,1.05,1,0.92,1.13,1.06,1.05,1.08,0.95,0.88,0.88,0.94,0.94,0.91,0.9,0.95,0.92, "\
			"n, 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,"\
			"l, 1.23,0.91,0.98,1.09,0.86,,,0.82,1.05,1.16,1.15,1.07,1.08,1.11,1.13,1.09,1.1,"\
			"vl,1.45,,,1.18,0.71,,,,1.11,1.32,1.3,1.13,1.16,1.22,1.25,1.18,1.19");
	saya("t",t)	
}
function demo7() {
	print Total_risk("nominal");
	print Effort("nominal");
}
function demo6( i,n) { 
	print 666;
	n=500;
	while(n--) {
		Total_risk(Project);
		Effort(Project);
	}
	print "a"
}
function demo5()   { 
	print 5555;
	print Total_risk(Project) 
}
function demo4(  t)   {
	table(t,  # top right
			"tr,  vl,l",
			"aa, 23, 24,"\
			" bb, 50, 60");
	print 4444;    saya("t",t) 
	exit;
}
function demo3()   { 
	while (Repeats-- > 0) {
		array(Cache)
		printf("%.2f\n", Effort(Project));
	}
}
function demo2() { 
	print ">" Project;
	print Effort(Project);
	print Effort(Project)
	array(Cache)
	print Effort(Project)
	saya("Cache",Cache)
}
function demo1() { 
	print "hey! it runs!" 
}