2009-08-17から1日間の記事一覧
与えられたリストに0があるかどうかを調べる関数を作ってみる。 (* リスト内に0が含まれているかを調べる *) (* contain_zero : int list -> bool *) let contain_zero lst = match lst with [] -> false | first :: rest -> if first = 0 then true else fa…
与えられたリストに0があるかどうかを調べる関数を作ってみる。 (* リスト内に0が含まれているかを調べる *) (* contain_zero : int list -> bool *) let contain_zero lst = match lst with [] -> false | first :: rest -> if first = 0 then true else fa…