Lisp常用函数.docVIP

Lisp常用函数 Lisp 语法及变量皆不分大小写(case insensitive)。 NIL 空串行，相当于 () 。另外真伪值表示时， T 表真， NIL 表伪。只要是任何不是 NIL (空串行) 的值，真伪值都表示真。 QUOTE CODE: (QUOTE 参数) 将参数直接传回，不做任何评估动作。可用 (单引号)取代 SETQ, SETF, LET CODE: (SETQ 参数1 参数2) (SETF 参数1 参数2) (LET ((变量1名称 变量1的值) (变量2名称 变量2的值) ........ ) 变数1,2...的作用范围，既程序执行叙述 ) SETQ, SETF 将参数1的值连结至参数2。 LET 只有在作用范围内有效。 注： SetQ = set quote; SetF = set form 注： 全域变数习惯用两个 * 把变量名称包起来，例如 *globe-variable* CAR, CDR CODE: (CAR 串行参数) (CDR 串行参数) CAR 取得参数串行的第一个元素；CDR 取得扣掉第一个元素之后的新串行。 CONS CODE: (CONS 参数1 参数串行2) 把参数1 加到参数串行2 的第一个元素，产生出新的串行。 对任一串行 A 而言， (CONS (CAR A) (CDR A)) 即为 A 。 注：如果第二个参数不是串行，则会产生出点对，故少用。 APPEND CODE: (APPEND 参数串行1 参数串行2 ........ ) 合并若干参数串行，形成新的串行。 注：如果最后一个参数不是串行，也会形成尾巴是带点的串行，故少用。 LIST CODE: (LIST 参数1 ........ ) 将若干参数，当作是新串行的元素，形成新串行。 注： APPEND 除了最后一个之外的参数皆需为串行，而 LIST 不用。 NULL CODE: (NULL 参数) 判断参数是否为空串行(NIL)。 ATOM, LISTP, NUMBERP, ZEROP CODE: (ATOM 参数) (LISTP 参数) (NUMBERP 参数) (ZEROP 参数) 判断参数是否为 atom(原子), list(串行), number(数字), zero(0) ， ZEROP 的参数必须为数字。 LENGTH CODE: (LENGTH 参数串行) 计算参数串行内的元素有几个。 REVERSE CODE: (REVERSE 参数串行) 将参数串行内的元素顺序反过来，切记，它只会反转第一层的元素。 EQUAL [Copy to clipboard] [ - ] CODE: (EQUAL 参数1 参数2) 比较两参数是否相等。 =, , , =, = CODE: (= 参数1 参数2) ( 参数1 参数2) ( 参数1 参数2) (= 参数1 参数2) (= 参数1 参数2) 功用正如你所想，传回值是 T 或是 NIL 。 NOT, AND, OR CODE: (NOT 参数) (AND 参数1 参数2 ...... ) (OR 参数1 参数2 ...... ) 功用正如你所想。AND 由左至右搜寻是否有 NIL ，碰到第一个满足的元素时，就停止搜寻，然后传回 NIL ，不然等搜寻到最后一个之后，最后一个参数就会被传回来啦。同理， OR 会搜寻第一个非 NIL 的元素，然后就停止搜寻，把那个元素当做传回值啦。 (to be continued... ) IF, COND CODE: (IF 测试条件 测试条件为真的执行叙述 测试条件为伪的执行叙述) (COND ((测试条件1) (待执行叙述1)) ((测试条件2) (待执行叙述2)) ...... ((测试条件n) (待执行叙述n)) ) 由测试条件1~测试条件n逐一检查，发现的第一个满足的测试条件k，就执行之后的待执行叙述k，执行之后，即终止测试，并跳出此 COND 叙述。 注：下面使用方法，类似一般语言的 if-then-else 使用方式 CODE: (COND ((测试条件1) (待执行叙述1)) ( T (待执行叙述2)) ) DEFUN CODE: (DEFUN 函数名称 (参数1 参数2 ... ) (执行叙述1) (执行叙述2) ......... ) 函数定义啦！如果有需要递归定义的话，请直接使用函数名称。 范例： CODE: (DEFUN factorial (N) (COND ((= N 0) 1) (T (* N (factorial (- N 1)))) ) ) 使用时候： (factorial 5) 传回结