
(in-package dump)
(EVAL-WHEN (COMPILE LOAD EVAL)
                       (DATABASE:MAKESYMS '.%%symbol-label%%. 0 39 "dump"))

(setq database:*db-input* (setq .%%symbol-label%%.8 (make-instance 'pail-lib::poolfile :real-contents (list (setq .%%symbol-label%%.9 (make-instance 'pail-lib:pool-item :name-part "part-room" :start-object (pail-lib::get-file-object "part-room"))) (setq .%%symbol-label%%.10 (make-instance 'pail-lib:pool-item :name-part "brownroom" :start-object (pail-lib::get-file-object "brownroom"))) (setq .%%symbol-label%%.11 (make-instance 'pail-lib:pool-item :name-part "baseroom" :start-object (pail-lib::get-file-object "baseroom"))) (setq .%%symbol-label%%.12 (setq .%%symbol-label%%.12 (make-instance 'pail-lib:pool-item :from-button nil :start-object (setq .%%symbol-label%%.13 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.14 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.15 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.16 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.17 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.18 (make-instance 'pail-lib:decision-tree :descendants nil :content 'common-lisp-user::rubescens))) :content 'common-lisp-user::species))) :content 0)) (setq .%%symbol-label%%.19 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.20 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.21 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.22 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.23 (make-instance 'pail-lib:decision-tree :descendants nil :content 'common-lisp-user::brunnescens))) :content 'common-lisp-user::species))) :content 0)) (setq .%%symbol-label%%.24 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.25 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.26 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.27 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.28 (make-instance 'pail-lib:decision-tree :descendants nil :content 'common-lisp-user::citrina))) :content 'common-lisp-user::species))) :content 1)) (setq .%%symbol-label%%.29 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.30 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.31 (make-instance 'pail-lib:decision-tree :descendants nil :content 'common-lisp-user::phalloides))) :content 'common-lisp-user::species))) :content 0))) :content 'common-lisp-user::bulbous-base))) :content 1))) :content 'common-lisp-user::bruises-brown))) :content 1))) :content 'common-lisp-user::bruises-red))) :content 1)) (setq .%%symbol-label%%.32 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.33 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.34 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.35 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.36 (make-instance 'pail-lib:decision-tree :descendants nil :content 'common-lisp-user::verna))) :content 'common-lisp-user::species))) :content 0)) (setq .%%symbol-label%%.37 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.38 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.39 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.40 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.41 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.42 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.43 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.44 (make-instance 'pail-lib:decision-tree :descendants (list (setq .%%symbol-label%%.45 (make-instance 'pail-lib:decision-tree :descendants nil :content (list 'common-lisp-user::tenuifolia 'common-lisp-user::virosa 'common-lisp-user::bisporigera)))) :content 'common-lisp-user::species))) :content 0))) :content 'common-lisp-user::bulbous-base))) :content 1))) :content 'common-lisp-user::bruises-brown))) :content 1))) :content 'common-lisp-user::bruises-red))) :content 1))) :content 'common-lisp-user::potassium-hydroxide))) :content 0))) :content 'common-lisp-user::color)) :name-part "mushroom-rules")))) :contents (list (setq .%%symbol-label%%.46 (make-instance 'pail-lib::filentry :classname "elements" :poolname "part-room")) (setq .%%symbol-label%%.47 (make-instance 'pail-lib::filentry :classname "elements" :poolname "brownroom")) (setq .%%symbol-label%%.48 (make-instance 'pail-lib::filentry :classname "elements" :poolname "baseroom")) (setq .%%symbol-label%%.49 (make-instance 'pail-lib::filentry :classname "decision-tree" :poolname "mushroom-rules"))) :filename "")))