module Dfs = struct
let rec dfslsts g paths final =
let l = PrimePath.removeDuplicates (PrimePath.extendPaths g paths)
in
let f elem =
if (List.mem "%d" (List.flatten fin
所有： 我怎麼能寫在 「咖喱」 語法如下： let y = 2 in
let f x = x + y in
let f x = let y = 3 in f y in
f 5
我在第一次嘗試這樣的事情： (y -> (f -> ((f x -> f 5) (y -> f y) 3)) x + y) 2
但是，這似乎並沒有正確評估。 更好的是，Lambda表達式可以看到綁定。 謝謝！
我從來不喜歡與定義的發揮，尤其是在面試。 據我所知： 編輯： 尾遞歸函數是它的遞歸調用後沒有做任何更多的計算功能。 我認爲第二個不是尾遞歸，因爲它根本沒有進行遞歸調用，所以不是尾遞歸。 但是第一個是，即使它使2遞歸調用尾遞歸，它不會做以後的東西，所以我想我在這裏正確使用我的尾巴recursivness的定義。 let rec func x =
if x > 10 then x else
每當我運行代碼時，disting true和disting false也變成了expression1。結果反之亦然此代碼 let disting v =
match v with
| bool -> (*expression2*)
| int -> (*expression1*)
| _ -> (*expression3*)
這也有類似的問題。我怎樣才
let my_matrix1 = [[1;2];[3;4]];;
let my_matrix2 = [[4;7;8];[3;2;1]];;
我已經定義了兩個矩陣，所以我可以看到代碼是否正常工作。 我已經做了的元素： let rec does_it_contain lis x =
if (lis = []) then false
else if ((List.hd lis) = x) t