delcs till 1 rdrlisp.