The important files are here.

objclass.lsp     -- Object Classifier ... common lisp
objbrow.lsp      -- Object Browser    ... ACL Window system
demo2.lsp        -- demonstration for Object Browser
oc-intro.htm     -- an Introduction to Object Classifier html

objclasc.lsp     -- cyclic definition version
testc1.lsp       -- test data for it
spec.lsp         -- specification (separated from objclass.lsp ... because file size exceeded...:-(
history.lsp      -- history (separated from objclass.lsp ... because file size exceeded...:-(


[interface]

The following functions are useful.

(defclassifier name category*)          -- define classifier class

(setf bag (make-classifier name))       -- make classifier instance

(put-object* bag object*)               -- put objects in the classifier

(objectbrowser classifier-class object* &optional display-method)
                                        -- browse the objects in a classifier
                                        display-method applied to the leaf objects for
                                        view

*pure-theorist* : t or nil              -- this change t partition visible or not

(show bag display-method)               -- command line interface



[debug mode]

I can trace for debug selectively.

this variable *debug-mode* make the trace macro on/off

*debug-mode* : t or nil

this is t and then

*debug-category*

make selective trace available

