先週同様、数値計算な講義中にOCamlでの実装を書いた。 # let secant f x1 x2 stop = let delta xn1 xn2 = (f xn2) *. (xn2 -. xn1) /. ((f xn2) -. (f xn1)) in let stopcond = stop f delta in let rec iter xn1 xn2 = if (stopcond xn1 xn2) then xn2 els…

OCamlのコードとか考えてた。書けた。 # let newtonMethod f fa cond x0 = let rec iter xn = if (cond f fa xn) then xn else (iter (xn -. (f xn) /. (fa xn))) in iter x0;; val newtonMethod : (float -> float) -> (float -> float) -> ((float -> floa…

大学の図書館でThe Little Schemerを探したら貸し出し中だったので、なんかおもしれー本ねーかなーと探していたらThe Little MLerなる本を見つけた。おもしろそうなので借りた。読んだ。おもしろい。ちんたら読んでるので前の方しかまだ読んでないけど、パタ…

参考ページとか http://www.i.kyushu-u.ac.jp/~bannai/ocaml-intro/ http://www.ocaml-tutorial.org/ocaml%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0%E3%81%AE%E6%A7%8B%E9%80%A0 http://jijixi.azito.com/cgi-bin/diary/index.rb?date=19700102 http:/…

まずは環境整備。 http://caml.inria.fr/download.en.html から、「Self installer (3.09.3) for the port based on the Microsoft toolchain」とやらダウンロードしてきて実行。適当な所にインストール完了。なんかこれだけで随分GUIGUIした環境がセットア…