defun - defun

defun (skrót od „ de fine fun ction”) to makro z rodziny języków programowania Lisp, które definiuje funkcję w środowisku globalnym używającą postaci:

(defun <function-name> (<parameter-1> <parameter-2> ... <parameter-N>) 
  "optional documentation"
  <function-body>...)

Zdefiniowanie funkcji addnumbersdodającej dwie liczby:

 ;; Define a function that adds two numbers together:
 (defun addnumbers (number1 number2)
   (+ number1 number2))
 (addnumbers 5 4)
 9

Definiowanie funkcji, squarektóra podnosi liczbę do kwadratu:

 ;; Define a function that squares a number:
 (defun square (x) 
   (* x x))
 (square 4)
 16

Definiowanie funkcji zwracającej factorialz a number:

 (defun factorial (number)
   "calculates the factorial"
   (if (= number 1)
       1
       (* number (factorial (- number 1)))))
 (factorial 6)
 720

Zobacz też

Bibliografia

  1. ^ „Makro DEFUN” . LispWorks Ltd.

Linki zewnętrzne