all:
	clall '(load "cl-types-graph.lisp")'
	for f in cl-types-in-*.dot ; do tred < $$f | dot -Tps /dev/stdin > $${f/.dot/.ps} || echo $$status ; done
	for f in cl-types-in-*.ps ; do gsview $$f & done
ViewGit