subtypep-cons.lsp 9.97 KB