((/taspi/database/entry.lisp::good-study-entry (nil nil nil nil (if) nil nil) ((nil) nil (consp) (let) nil nil nil) ((entry) nil ((study-id (car entry))) (let) nil nil nil) (nil nil (rest) ((seqs (my-get (quote sequences) rest))) nil (and) nil) (nil nil (cdr map name good-id good-sequences good-mapping good-name) nil nil nil nil) ((entry study-id seqs map name) nil nil (my-get my-get) nil nil nil) ((rest rest) nil (quote quote) nil nil nil nil)) (/taspi/database/entry.lisp::good-analysis-entry (nil nil nil nil (if) nil nil) ((nil) nil (consp) (let) nil nil nil) ((entry) nil ((analysis-id (car entry))) (let) nil nil nil) (nil nil (rest) nil nil nil nil) (nil nil (cdr name method dtype model date tool author tl ingroup outgroup good-id good-id good-name good-method good-data-type good-model good-date good-tool good-author good-taxa-list) (good-ingroup good-outgroup) nil nil nil) ((entry analysis-id study-id name method dtype model date tool author tl ingroup tl outgroup tl) nil nil (my-get my-get my-get my-get my-get my-get my-get my-get my-get my-get) nil nil nil) ((rest rest rest rest rest rest rest rest rest rest) nil (quote quote quote quote quote quote quote quote quote quote) nil nil nil nil)) (/taspi/database/entry.lisp::good-tree-entry (nil nil nil nil (if) nil nil) ((nil) nil (consp) (let) nil nil nil) ((entry) nil ((tree-id (car entry))) (let) nil nil nil) (nil nil (rest) nil nil nil nil) (nil nil (cdr rooted? brlens? tree type mp ml name good-id good-id good-rooted-flg good-brlens-flg good-tree good-tree-type good-mp good-ml good-name) nil nil nil nil) ((entry tree-id analysis-id rooted? brlens? tree type mp ml name) nil nil (my-get my-get my-get my-get my-get my-get my-get) nil nil nil) ((rest rest rest rest rest rest rest) nil (quote quote quote quote quote quote quote) nil nil nil nil)) (/taspi/database/entry.lisp::get-id (nil nil (car) nil nil nil nil) ((entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-name (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((name entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-sequences (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((sequences entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-mapping (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((mapping entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-study-id (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((study-id entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-method (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((method entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-data-type (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((data-type entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-model (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((model entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-date (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((date entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-tool (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((tool entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-author (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((author entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-taxa-list (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((taxa-list entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-ingroup (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((ingroup entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-outgroup (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((outgroup entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-analysis-id (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((analysis-id entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-rooted-flg (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((rooted? entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-brlens-flg (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((brlens? entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-tree (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((tree entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-tree-type (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((type entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-mp (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((mp entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/taspi/database/entry.lisp::get-ml (nil nil nil (my-get) nil nil nil) (nil nil (quote cdr) nil nil nil nil) ((ml entry) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)))