1 USING: graphs tools.test namespaces kernel sorting assocs ;
6 [ ] [ "v" dup get "g" get add-vertex ] unit-test
8 [ { "v" } ] [ 1 "g" get at keys ] unit-test
11 { 1 H{ { 1 1 } { 2 2 } } }
12 { 2 H{ { 3 3 } { 4 4 } } }
13 { 4 H{ { 4 4 } { 5 5 } } }
17 2 [ "g" get at ] closure keys natural-sort