diff options
Diffstat (limited to 'ghc/misc/examples/nfib/nfibO.hs')
-rw-r--r-- | ghc/misc/examples/nfib/nfibO.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/ghc/misc/examples/nfib/nfibO.hs b/ghc/misc/examples/nfib/nfibO.hs deleted file mode 100644 index a63c33478d..0000000000 --- a/ghc/misc/examples/nfib/nfibO.hs +++ /dev/null @@ -1,10 +0,0 @@ -module Main where - -main = print (nfib 28) - -nfib :: (Num a, Ord a) => a -> a - -nfib n | n <= 1 = 1 - | otherwise = (n1 + n2 + 1) - where n1 = nfib (n-1) - n2 = nfib (n-2) |