subtypep.lsp 2.85 KB