% This scipt generates titles for dirf.m and sol.m.

if strcmp(eqn_name,'eqn1d')
	title(strcat('x''=',parameter))
else
	title(eqn_name)
end

if dimension==1
	xlabel('t'); ylabel('x')
else
	xlabel('x'); ylabel('y'); zlabel('z')
end
% M. Day, June 5, 2005; May 6, 2012