Loading files
This file is pinned to the selected release. Download the original to open it in your design tool.
1753a4cb4This file is pinned to the selected release. Download the original to open it in your design tool.
{
fib n = case (<=) n 1 of {
True -> 1;
False -> (+) (fib ((-) n 2)) (fib ((-) n 1));
};
main = fib 20;
}