;; defining and displaying an empty graph

(define g (graph))

(describe g)	; output below

(define gv (make <graph-view> :graph g)) ; puts up a graph window
					 ; 3rd button adds vertices 
					 ; and edges
