From a58ac3e24919f15c832aafde4f0d0c40df8f353e Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Wed, 3 Jan 2007 02:44:00 +0000 Subject: [PATCH] r11438: remove MRLO as this has been deleted from the UMLS since 2004AB --- classes.lisp | 13 ------------- package.lisp | 3 +-- 2 files changed, 1 insertion(+), 15 deletions(-) diff --git a/classes.lisp b/classes.lisp index 996a7cd..9ed9be8 100644 --- a/classes.lisp +++ b/classes.lisp @@ -168,17 +168,6 @@ (:user-name "Source") (:default-print-slots aui sab code saui sdui scui tty srl)) -(defclass ulo (umlsclass) - ((isn :value-type string :initarg :isn :reader isn) - (fr :value-type fixnum :initarg :fr :reader fr) - (un :value-type string :initarg :un :reader un) - (sui :value-type fixnum :initarg :sui :reader sui :print-formatter fmt-sui) - (sna :value-type string :initarg :sna :reader sna) - (soui :value-type string :initarg :soui :reader soui)) - (:metaclass hyperobject-class) - (:user-name "Locator") - (:default-print-slots isn fr un sna soui sui)) - (defclass uterm (umlsclass) ((lui :value-type fixnum :initarg :lui :reader lui :print-formatter fmt-lui :hyperlink find-uterm-lui) @@ -256,7 +245,6 @@ (s#map :reader s#map :subobject (find-umap-cui cui)) (s#smap :reader s#smap :subobject (find-usmap-cui cui)) (s#sty :reader s#sty :subobject (find-usty-cui cui)) - (s#lo :reader s#lo :subobject (find-ulo-cui cui)) (s#term :reader s#term :subobject (find-uterm-cui cui)) (s#sat :reader s#sat :subobject (find-usat-ui cui)) (s#rel :reader s#rel :subobject (find-urel-cui cui)) @@ -298,7 +286,6 @@ (s#map :reader s#map :subobject (find-umap-cui cui)) (s#smap :reader s#smap :subobject (find-usmap-cui cui)) (s#sty :reader s#sty :subobject (find-usty-cui cui)) - (s#lo :reader s#lo :subobject (find-ulo-cui cui)) (s#term :reader s#term :subobject (find-uterm-cui cui)) (s#sat :reader s#sat :subobject (find-usat-ui cui)) (s#rel :reader s#rel :subobject (find-urel-cui cui)) diff --git a/package.lisp b/package.lisp index 548f731..3771a51 100644 --- a/package.lisp +++ b/package.lisp @@ -32,7 +32,7 @@ #:lexterm #:labr #:lagr #:lcmp #:lmod #:lnom #:lprn #:lprp #:lspl #:ltrm #:ltyp #:lwd #:sdef #:sstr #:sstre1 #:sstre2 #:sty #:tui #:def #:sab #:srl #:tty #:rank #:suppress #:atn #:atv #:vcui - #:rcui #:vsab #:code #:saui #:scui #:sdui #:ispref + #:rcui #:vsab #:code #:saui #:scui #:sdui #:ispref #:rl #:sty2 #:ui #:ui2 #:ui3 #:eui #:bas #:eui2 #:bas2 #:rui #:cui #:aui #:lui #:sui #:wd #:lat #:nstr :cuilist #:rsab #:lat @@ -86,7 +86,6 @@ #:find-ucoc-cui2 #:find-ucon-coc-cui2 #:find-usty-sty - #:find-ulo-cui #:suistr #:print-umlsclass #:find-ucon-cui #:make-ucon-cui -- 2.34.1