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)
特に迷わずかけました。
だんだん慣れてきた証拠かな?
でも、現在の知識や知っていることでは仕事にはつかえないなぁ。
はやく仕事でつかえるまでになりたいなぁ。
moremagic
2013-06-18