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
10 ;;;; This file, part of UMLisp, is
11 ;;;; Copyright (c) 2000-2004 by Kevin M. Rosenberg, M.D.
13 ;;;; UMLisp users are granted the rights to distribute and use this software
14 ;;;; as governed by the terms of the GNU General Public License.
15 ;;;; *************************************************************************
17 (in-package #:cl-user)
19 (eval-when (:compile-toplevel :load-toplevel :execute) ;; enclose reader macro
20 (defpackage #:umlisp-orf
22 (:use #:kmrcl #:common-lisp #:hyperobject)
28 #:ucon #:uterm #:ustr #:usrl #:uso #:ucxt #:urank #:udef #:usat #:usab #:ulo
29 #:urel #:ucoc #:usty #:uatx #:uxw #:uxnw #:uxns
30 #:lexterm #:labr #:lagr #:lcmp #:lmod #:lnom #:lprn #:lprp #:lspl #:ltrm
31 #:ltyp #:lwd #:sdef #:sstr #:sstre1 #:sstre2
32 #:sty #:tui #:def #:sab #:srl #:tty #:rank #:supres #:atn #:atv #:vcui
34 #:rl #:sty2 #:ui #:ui2 #:ui3 #:eui #:bas #:eui2 #:bas2
35 #:cui #:lui #:sui #:wd #:lat #:nstr :cuilist
37 #:s#def #:s#sty #:s#term #:s#str #:s#atx #:s#lo #:s#sat #:s#rel #:s#coc
39 #:pfstr #:pfstr2 #:lrl #:def #:ts #:cui1 #:cui2 #:rela #:sl #:mg #:rel
40 #:soc #:cot #:cof #:coa #:isn #:fr #:un #:sna #:soui #:hcd #:stt #:str
42 ;; From class-support.lisp
44 #:english-term-p #:remove-non-english-terms #:remove-english-terms
45 #:fmt-cui #:fmt-tui #:fmt-sui #:fmt-eui #:fmt-tui
46 #:display-con #:display-term #:display-str
48 #:cui-p #:lui-p #:sui-p #:tui-p #:eui-p
49 #:rel-abbr-info #:filter-urels-by-rel
50 #:ucon-ancestors #:ucon-parents
51 #:mesh-number #:cxt-ancestors #:ucon-ustrs
52 #:lat-abbr-info #:stt-abbr-info
77 #:parse-cui #:parse-lui #:parse-sui #:parse-tui #:parse-eui
79 ;; From sql-classes.lisp
97 #:find-ucon-cui-sans-pfstr
131 #:find-ucon-normalized-word
132 #:find-cui-normalized-word
133 #:find-lui-normalized-word
134 #:find-sui-normalized-word
136 #:find-ustr-normalized-word
137 #:find-uterm-multiword
139 #:find-uterm-normalized-word
140 #:find-ucon-multiword
141 #:find-ucon-normalized-multiword
142 #:find-ustr-multiword
143 #:find-ustr-normalized-multiword
177 #:tui-sign-or-symptom
178 #:tui-disease-or-syndrome
183 #:find-ucon2_freq-coc-tui
185 #:find-ucon2-coc-str&sty
186 #:find-ucon2-rel-str&sty
187 #:find-ucon2_freq-tui-all
188 #:find-ucon2_freq-rel-tui-all
189 #:find-ucon2_freq-coc-tui-all
196 (defpackage umlisp-orf-user
197 (:use #:kmrcl #:common-lisp #:hyperobject)
198 (:import-from :umlisp-orf . #1#)
200 (:documentation "User package for UMLisp")))