Prolog

I want to make a rule dependency graph for a Prolog program. For instance, the following program


foo :- bar.
bar :- quux, coox.
baz.

would result in


depends(foo, [bar]).
depends(bar, [quux, coox]).
depends(baz, []).

(which I would turn into a graph using some graphic hackery). Any tips? (I've already read SICP.)

Wait a second, OP, you want to do this in Prolog? Like, do something, anything, practically useful, in Prolog?

HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA HA