F# fibonacci, call memo.fsx and fibonacci.fsx

memofib.fsx

#load "memo.fsx"
#load "fibonacci.fsx"

open memo
open fibonacci
open System.Diagnostics

let memo_fib = memoize fib
let memo_fib_tail = memoize fib_tail_recursion

//let sw = new System.Diagnostics.Stopwatch()
let sw = new Stopwatch()

sw.Start()
memo_fib 45 |> printfn "%A"
sw.Stop()
sw.ToString() |> printfn "%s"

sw.Restart()
memo_fib_tail 45 |> printfn "%A"
sw.Stop()
sw.ToString() |> printfn "%s"