Update primitives.lsp