the program in *dot-path*."
(let ((dot-string (graph->dot g nil))
(dot-type (concatenate 'string "-T" (string-downcase (symbol-name type)))))
the program in *dot-path*."
(let ((dot-string (graph->dot g nil))
(dot-type (concatenate 'string "-T" (string-downcase (symbol-name type)))))