home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / science / xlspstr1.sit / autoload.lsp next >
Lisp/Scheme  |  1990-08-15  |  653b  |  21 lines
  1. ;;;; XLISP-STAT 2.1 Copyright (c) 1990, by Luke Tierney
  2. ;;;; Additions to Xlisp 2.1, Copyright (c) 1989 by David Michael Betz
  3. ;;;; You may give out copies of this software; for conditions see the file
  4. ;;;; COPYING included with this distribution.
  5.  
  6. (provide "autoload")
  7.  
  8. (defmacro autoload (name module)
  9.   `(if (not (member ,module *modules*))
  10.        (defun ,name (&rest args)
  11.          (fmakunbound ',name)
  12.          (require ,module)
  13.          (apply ',name args))))
  14.     
  15. (autoload nreg-model "nonlin")
  16. (autoload oneway-model "oneway")
  17. (autoload newtonmax "maximize")
  18. (autoload nelmeadmax "maximize")
  19. (autoload bayes-model "bayes")
  20. (autoload step "step")
  21.