anchor.diff:  ;;; File: utils.lisp
   ;;; Description: Miscellaneous utility functions.
   
  -;;; $Id: utils.lisp,v 1.21 2002/11/18 14:55:05 youngde Exp $
  +;;; $Id: utils.lisp,v 1.22 2004/09/15 14:21:40 youngde Exp $
   
   (in-package "LISA.UTILS")
   
  
positive.code:             (declare (function f0 f1))
              (lambda (&rest args) (multiple-value-call f0 (apply f1 args))))
            functions :initial-value #'identity))
  
negative.code: ;;; Function Compositions
  ;;;
  
  #|
  (defmacro compose (&rest functions)
    "Macro: compose functions or macros of 1 argument into a lambda.
  E.g., (compose abs (dl-val zz) 'key) ==>
  