no-nums 実装

number? って基本関数なんだね。
で、基本関数ってなんだろう?
Scheme 処理系で実装されている関数てことかしら?

(define no-nums
  (lambda (lat)
    (cond ((null? lat) '())
          ((number? (car lat)) (no-nums (cdr lat)))
          (else
           (cons (car lat) (no-nums (cdr lat)))))))
(no-nums '(1 2 3 h a c 4 k 5 e 6 r))
;(h a c k e r)

特に迷わずかけました。
だんだん慣れてきた証拠かな?

でも、現在の知識や知っていることでは仕事にはつかえないなぁ。
はやく仕事でつかえるまでになりたいなぁ。