subtypep-rational.lsp 5.37 KB