+ (:print-slots sab code atn atv))
+
+(defclass usab (umlsclass)
+ ((vcui :type fixnum :initarg :vcui :reader vcui :print-formatter fmt-cui)
+ (rcui :type fixnum :initarg :rcui :reader rcui :print-formatter fmt-cui)
+ (vsab :type string :initarg :vsab :reader vsab)
+ (rsab :type string :initarg :rsab :reader rsab :reference find-ucan-sab)
+ (son :type string :initarg :son :reader son)
+ (sf :type string :initarg :sf :reader sf)
+ (sver :type string :initarg :sver :reader sver)
+ (mstart :type string :initarg :mstart :reader mstart)
+ (mend :type string :initarg :mend :reader mend)
+ (imeta :type string :initarg :imeta :reader imeta)
+ (rmeta :type string :initarg :rmeta :reader rmeta)
+ (slc :type cdata :initarg :slc :reader slc)
+ (scc :type cdata :initarg :scc :reader scc)
+ (srl :type fixnum :initarg :srl :reader srl)
+ (tfr :type fixnum :initarg :tfr :reader tfr :print-formatter fmt-comma-integer)
+ (cfr :type fixnum :initarg :cfr :reader cfr :print-formatter fmt-comma-integer)
+ (cxty :type string :initarg :cxty :reader cxty)
+ (ttyl :type string :initarg :ttyl :reader ttyl)
+ (atnl :type string :initarg :atnl :reader atnl)
+ (lat :type string :initarg :lat :reader lat)
+ (cenc :type string :initarg :cenc :reader cenc)
+ (curver :type string :initarg :curver :reader curver)
+ (sabin :type string :initarg :sabin :reader sabin))
+ (:metaclass hyperobject-class)
+ (:default-initargs :vcui nil :rcui nil :vsab nil :rsab nil :son nil :sf nil
+ :sver nil :mstart nil :mend nil :imeta nil :rmeta nil
+ :slc nil :scc nil :srl nil :tfr nil :cfr nil :cxty nil
+ :ttyl nil :atnl nil :lat nil :cenc nil :curver nil
+ :sabin nil)
+ (:title "Source Abbreviation")
+ (:print-slots vcui rcui vsab rsab son sf sver mstart mend imeta
+ rmeta slc scc srl tfr cfr cxty ttyl atnl lat cenc
+ curver sabin))