0
我在Lisp中下面的代碼:轉換代碼F#
(defun Is_List_Even (lista)
(cond
((null lista) t)
((null (cadr lista)) nil)
(t (Is_List_Even (cddr lista)))))
有人可以幫助我在F#寫?我是F#的新手,我很匆忙。
Regards, Voicu。
我在Lisp中下面的代碼:轉換代碼F#
(defun Is_List_Even (lista)
(cond
((null lista) t)
((null (cadr lista)) nil)
(t (Is_List_Even (cddr lista)))))
有人可以幫助我在F#寫?我是F#的新手,我很匆忙。
Regards, Voicu。
let rec even = function
| [] -> true
| [_] -> false
| _::_::l -> even l
我冒昧地將您的代碼重新格式化爲Lisp標準。還有幾點:名稱通常由連字符組成('is-list-even'),您可以調用您的列表'list'。 – Svante 2010-02-18 11:22:02