ghc/misc/examples/nfib/nfib.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

#include <stdio.h>

main ()
{
    int n;
    
    scanf("%d",&n);
    n = nfib(n);
    printf("nfibs=%d\n",n);
    exit(0);
}

nfib (n)
{
    return(n <= 1 ? 1 : nfib(n-1) + nfib(n-2) + 1);
}