sicp-ex-4.2

  
  
 ;; 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))