Differences

This shows you the differences between two versions of the page.

sps [2018/10/01 10:37]
joslarki
sps [2018/10/01 12:20] (current)
joslarki
Line 46: Line 46:
    (cond     (cond
      [(null? ls) '()]       [(null? ls) '()]
-      [(pair? (car ls))+      [(list? (car ls))
      (cons (filter* f (car ls)) (filter* f (cdr ls)))]       (cons (filter* f (car ls)) (filter* f (cdr ls)))]
-      [(null? (car ls)) '()] 
      [(f (car ls)) (cons (car ls) (filter* f (cdr ls)))]       [(f (car ls)) (cons (car ls) (filter* f (cdr ls)))]
      [else (filter* f (cdr ls))])))       [else (filter* f (cdr ls))])))
 

sps.txt · Last modified: 2018/10/01 12:20 by joslarki