Re: [心得] AutoLISP 的 Hello, world!\n
謝謝你仔細的回答 我是第一次執行lisp程式
不曉得執行的流程
※ 引述《sjgau (sjgau)》之銘言：
: 以下，應該是 正確的
: (defun f2(n / )
: ;
: )
: 我把 函數名稱改成 f2
: 執行的方法是
: (load "tmp.lsp")
: (f2 10)
這兩行可以說是關鍵所在
我之前是有load進去，但是不曉得怎麼跑
經過第二行和以下執行結果的示範
我了解了 非常感謝回答 你的解答真的很詳細
若可以的話 可以教教我DEFINE的用法嗎？謝謝
: 還有，第0項 和 第1項的答案都是 1
: 還有，為了擔心 n < 0
: 所以，
: if (n <= 0) return 1;
: 令: (f2 0)
: 1
: 指令: (f2 1)
: 1
: 指令: (f2 2)
: 2
: 指令: (f2 3)
: 3
: 指令: (f2 5)
: 8
: 指令: (f2 10)
: 89
: 指令: (f2 20)
: 10946
: 指令: (f2 25)
: 121393
: 指令: (f2 30)
: 1346269
: (defun f2 (n / )
: (cond ((<= n 0) 1)
: ((= n 1) 1)
: (t
: (+ (f2 (- n 1))
: (f2 (- n 2))
: )
: )
: )
: )
: ※ 引述《HiEArO (xsd)》之銘言：
: : 我使用以下的方法 是可以執行一些lisp的程式
: : 但是 只要遇到function的程式 好像就會出問題
: : 像以下這個程式
: : 下面應該是一個求Fibonacci數列的函數
: : (defun f(n)
: : (cond ((= n 0) 0)
: : ((= n 1) 1)
: : (t(+(f(- n 1))
: : (f(- n 2))))
: : )
: : )
: : 這個照以下方法執行
: : 會跑出訊息：no function definition: N
: : 為什麼呢? 可以幫我解答一下嗎？ 感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.174.244.48
討論串 (同標題文章)
Cad_Cae 近期熱門文章
PTT數位生活區 即時熱門文章
