

@#example@
@(define g (graph))@
@(do ((i 1 (+ i 1))) 
     ((= i 4) g)
     (add-vertex! i g))@
@(describe g)@
@#endexample@

@(bye)@
