projects
/
cl-graph.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Split out moptilities and dynamic-classes requirements into system-connections
[cl-graph.git]
/
dev
/
graph-metrics.lisp
diff --git
a/dev/graph-metrics.lisp
b/dev/graph-metrics.lisp
index
4a70726
..
066781d
100644
(file)
--- a/
dev/graph-metrics.lisp
+++ b/
dev/graph-metrics.lisp
@@
-9,8
+9,15
@@
Author: Gary King
DISCUSSION
|#
DISCUSSION
|#
-(in-package metabang.graph)
-
+(in-package #:metabang.graph)
+
+(eval-always
+ (import '(cl-mathstats:matrix-trace
+ cl-mathstats:sum-of-array-elements
+ cl-mathstats:matrix-multiply
+ cl-mathstats:normalize-matrix
+ cl-mathstats:combination-count
+ )))
(defun vertex-degree-counts (g)
"Returns an associative-container mapping edge-counts to the number of vertexes with that edge-count."
(defun vertex-degree-counts (g)
"Returns an associative-container mapping edge-counts to the number of vertexes with that edge-count."