函数是一起执行任务的一组语句。
定义函数
名为 defun 的宏用于定义函数， defun 宏需要三个参数-
- 函数名称
- 函数参数
- 函数主体
defun的语法是-
(defun name (parameter-list) "Optional documentation string." body)
让我们用简单的示例来说明这个概念。
函数 - 示例1
让我们编写一个名为 averagenum 的函数，该函数将打印四个数字的平均值，我们将这些数字作为参数发送。
创建一个名为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
