Permalink
Browse files

edge-wt representation (w 1); vertex retriever

  • Loading branch information...
1 parent b69cd37 commit a5917a98fe9002c0984716bfb17cb6f24ee00f7f @aruneshmathur committed Mar 28, 2012
Showing with 3 additions and 0 deletions.
  1. +3 −0 graph.scm
View
@@ -12,6 +12,9 @@
(list 'v name))
+(define vertex cadr)
+
+
(define (make-edge-wt wt)
(list 'w wt))

0 comments on commit a5917a9

Please sign in to comment.