Script Programming(스크립트 프로그래밍)

* 꼬리 재귀호출과 패턴 매칭을 이용하여 구현한 팩토리얼과 피보나치 수열 계산 (* Filename: fact.fs Rapid factorial and fibonacci seq implementations by pattern matching and tail recursive call Compile: fsc fact.fs Execute: fact Date: 2010/07/20 Author: phkim pkim __AT__ scripts.pe.kr *) #light let rec fact (n:int) : bigint = match n with | 0 | 1 -> 1I | k -> (bigint k) * (fact (k-1)) let factorial n = let rec loop acc k = match ..

* 꼬리 재귀호출과 패턴 매칭을 이용하여 구현한 팩토리얼과 피보나치 수열 계산 {- Filename: fact.hs Rapid factorial and fibonacci seq implementations by pattern matching and tail recursive call Compile: ghc fact.hs Execute: main Date: 2010/07/20 Author: phkim pkim (AT) scripts.pe.kr -} module Main where factorial :: Integer -> Integer factorial n = recfact 1 n recfact :: Integer -> Integer -> Integer recfact acc k = case k of 0 -..