1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10; Package: cl-user -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
5 ;;;; Name: package.lisp
6 ;;;; Purpose: Package definition for UMLisp
7 ;;;; Author: Kevin M. Rosenberg
12 ;;;; This file, part of UMLisp, is
13 ;;;; Copyright (c) 2000-2004 by Kevin M. Rosenberg, M.D.
15 ;;;; UMLisp users are granted the rights to distribute and use this software
16 ;;;; as governed by the terms of the GNU General Public License.
17 ;;;; *************************************************************************
19 (in-package #:cl-user)
21 (eval-when (:compile-toplevel :load-toplevel :execute) ;; enclose reader macro
24 (:use #:kmrcl #:common-lisp #:hyperobject)
30 #:ucon #:uterm #:ustr #:usrl #:uso #:ucxt #:urank #:udef #:usat #:usab #:ulo
31 #:urel #:ucoc #:usty #:uxw #:uxnw #:uxns
32 #:lexterm #:labr #:lagr #:lcmp #:lmod #:lnom #:lprn #:lprp #:lspl #:ltrm
33 #:ltyp #:lwd #:sdef #:sstr #:sstre1 #:sstre2
34 #:sty #:tui #:def #:sab #:srl #:tty #:rank #:supres #:atn #:atv #:vcui
36 #:rl #:sty2 #:ui #:ui2 #:ui3 #:eui #:bas #:eui2 #:bas2
37 #:cui #:lui #:sui #:wd #:lat #:nstr :cuilist
39 #:s#def #:s#sty #:s#term #:s#str #:s#lo #:s#sat #:s#rel #:s#coc
41 #:pfstr #:pfstr2 #:lrl #:def #:ts #:cui1 #:cui2 #:rela #:sl #:mg #:rel
42 #:soc #:cot #:cof #:coa #:isn #:fr #:un #:sna #:soui #:hcd #:stt #:str
44 ;; From class-support.lisp
46 #:english-term-p #:remove-non-english-terms #:remove-english-terms
47 #:fmt-cui #:fmt-tui #:fmt-sui #:fmt-eui #:fmt-tui
48 #:display-con #:display-term #:display-str
50 #:cui-p #:lui-p #:sui-p #:tui-p #:eui-p
51 #:rel-abbr-info #:filter-urels-by-rel
52 #:ucon-ancestors #:ucon-parents
53 #:mesh-number #:cxt-ancestors #:ucon-ustrs
54 #:lat-abbr-info #:stt-abbr-info
79 #:parse-cui #:parse-lui #:parse-sui #:parse-tui #:parse-eui
81 ;; From sql-classes.lisp
98 #:find-ucon-cui-sans-pfstr
132 #:find-ucon-normalized-word
133 #:find-cui-normalized-word
134 #:find-lui-normalized-word
135 #:find-sui-normalized-word
137 #:find-ustr-normalized-word
138 #:find-uterm-multiword
140 #:find-uterm-normalized-word
141 #:find-ucon-multiword
142 #:find-ucon-normalized-multiword
143 #:find-ustr-multiword
144 #:find-ustr-normalized-multiword
178 #:tui-sign-or-symptom
179 #:tui-disease-or-syndrome
184 #:find-ucon2_freq-coc-tui
186 #:find-ucon2-coc-str&sty
187 #:find-ucon2-rel-str&sty
188 #:find-ucon2_freq-tui-all
189 #:find-ucon2_freq-rel-tui-all
190 #:find-ucon2_freq-coc-tui-all
197 (defpackage umlisp-user
198 (:use #:kmrcl #:common-lisp #:hyperobject)
199 (:import-from :umlisp . #1#)
201 (:documentation "User package for UMLisp")))