LISP函数声明

函数是一起执行任务的一组语句。

定义函数

名为 defun 的宏用于定义函数， defun 宏需要三个参数-

• 函数名称
• 函数参数
• 函数主体

defun的语法是-

(defun name (parameter-list) "Optional documentation string." body)

让我们用简单的示例来说明这个概念。

函数- 示例1

创建一个名为main.lisp的新源代码文件，然后在其中键入以下代码。

(defun averagenum (n1 n2 n3 n4)
   (/( + n1 n2 n3 n4) 4)
)
(write(averagenum 10 20 30 40))

25

函数- 示例2

让我们定义并调用一个函数，当以圆的半径作为参数时，该函数将计算圆的面积。

创建一个名为main.lisp的新源代码文件，然后在其中键入以下代码。

(defun area-circle(rad)
   "Calculates area of a circle with given radius"
   (terpri)
   (format t "Radius: ~5f" rad)
   (format t "~%Area: ~10f" (* 3.141592 rad rad))
)
(area-circle 10)

Radius:  10.0
Area:   314.1592