subtypep-array.lsp 6.48 KB