Digits:=20:
read "SG_FEM/everything.txt":
read "autoset.txt":
read "funcarith.txt":
read "algo24.txt":

T:=gasket(7):
clearFunc(T,7,10):
clearFunc(T,7,11):
clearFunc(T,7,12):
makeTri6(T,10,[],1):
makeTri6(T,11,[],2):
makeTri6(T,12,[],3):
for i from 10 to 12 do
	ourPlot(T,2,i,cat("yeah",i));
end do;

for i from 10 to 12 do
	for j from i to 12 do
		m:=discInnerProduct(T,3,i,j);	
		printf("(%d,%d)=%20.20g\n",i,j,evalf(m,20));
	end do;
end do;