練習問題8.6

本文中の関数 whle を参考にして,for式相当の機能を実現する再帰関数を定義しなさい。

こんなんでいいのかな。

# let rec fr frm t body =
if frm <= t then
begin body frm; fr (frm + 1) t body end
;;
val fr : int -> int -> (int -> 'a) -> unit = <fun>
# fr 1 5 (fun x -> print_endline ( string_of_int x));;
1
2
3
4
5
- : unit = ()
カテゴリー: OCaml パーマリンク

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください