From 5725987c8dfd55d4ee0282f0a37779e06052f3c6 Mon Sep 17 00:00:00 2001 From: Loic Guegan Date: Sun, 24 Feb 2019 10:30:57 +0100 Subject: Re-organize code --- packages.lisp | 35 +++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) create mode 100644 packages.lisp (limited to 'packages.lisp') diff --git a/packages.lisp b/packages.lisp new file mode 100644 index 0000000..62443df --- /dev/null +++ b/packages.lisp @@ -0,0 +1,35 @@ +;;;; This file contains lisp-algos packages definitions + +;;; Union-Find packages + +(defpackage :com.lisp-algo.union-find + (:use :common-lisp) + (:nicknames :uf) + ;; Quick-Find + (:export :qf-create-network + :qf-union + :qf-connected) + ;; Quick-Union + (:export :qu-create-network + :qu-union + :qu-connected) + ;; Weighted-Quick-Union + (:export :wqu-create-network + :wqu-create-network + :wqu-union + :wqu-connected) + ;; Weighted-Quick-Union with Path Compression + (:export :wqupc-create-network + :wqupc-create-network + :wqupc-union + :wqupc-connected)) + + +;;; Unit tests + +(defpackage :com.lisp-algo.test + (:use :common-lisp + :lisp-unit + :com.lisp-algo.union-find) + (:export :get-row)) + -- cgit v1.2.3