Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 51 lines (42 sloc) 1.976 kb
e5b4ae4 Volkan Yazıcı - Fix early traversal exit bug. (Per report by Pawel Turnau.)
authored
1 ;;; Copyright (c) 2007-2009, Volkan YAZICI <volkan.yazici@gmail.com>
a0182a9 Initial import.
Volkan YAZICI authored
2 ;;; All rights reserved.
3
4 ;;; Redistribution and use in source and binary forms, with or without
5 ;;; modification, are permitted provided that the following conditions are met:
6
7 ;;; - Redistributions of source code must retain the above copyright notice,
8 ;;; this list of conditions and the following disclaimer.
9
10 ;;; - Redistributions in binary form must reproduce the above copyright notice,
11 ;;; this list of conditions and the following disclaimer in the documentation
12 ;;; and/or other materials provided with the distribution.
13
14 ;;; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
15 ;;; AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 ;;; IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 ;;; ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
18 ;;; LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
19 ;;; CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
20 ;;; SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
21 ;;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
22 ;;; CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
23 ;;; ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
24 ;;; POSSIBILITY OF SUCH DAMAGE.
25
26 (in-package :cl-user)
27
f1b173c Volkan Yazıcı - A cute BK-Tree logo is added to README file and a small typo fixed.
authored
28
29 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
30 ;;;
31 ;;; Package Definitions
32 ;;;
33
a0182a9 Initial import.
Volkan YAZICI authored
34 (defpackage :bk-tree
35 (:use :cl)
36 (:export :bk-tree
37 :distance-of
38 :value-of
39 :nodes-of
40 :duplicate-value
41 :search-result
42 :insert-value
91ca223 Volkan Yazıcı - Rename old `SEARCH-VALUE' to `HAIRY-SEARCH-VALUE'.
authored
43 :hairy-search-value
a0182a9 Initial import.
Volkan YAZICI authored
44 :search-value
45 :print-tree
76418eb Introduce some minor information functions: MAXIMUM-DEPTH and
Volkan YAZICI authored
46 :maximum-depth
47 :average-children-count
71a6282 Optimize LEVENSHTEIN.
Volkan YAZICI authored
48 :levenshtein
49 :levenshtein-cost
50 :levenshtein-max-distance))
Something went wrong with that request. Please try again.