Takes one argument, procedure instance. The value is an instance of procedure-step. For example, (root-node loss-of-verniers) = lov-n1
For example, (root-node loss-of-verniers) = lov-n1
(=> (Root-Node $X $Y) (Procedure $X))