read "SG_FEM/everything.txt":
read "func_file.txt":
read "funcarith.txt":

lvl:=5;
path:="data/";
numEigens:=13;
for i from 1 to numEigens do
        readFunc(T,i+12,cat(path,"neigens.",i));
end do;
for i from 1 to numEigens do
	ourPlot(T,lvl,i,cat("neigen ",i));
end do;