sicp-ex-4.2



<< Previous exercise (4.1) | Index | Next exercise (4.3) >>


meteorgan

  
  
 ;; a 
 all the pairs will be regraded as application. 
  
 ;; b 
 (define (application? exp) (tagged-list? exp 'call)) 
 (define (operator exp) (cadr exp)) 
 (define (operands exp) (cddr exp))