我在Haskell中创建了一个函数，称为“fib”，它显然可以计算斐波纳契数：

fib :: Integer -> Integer
fib 0 = 0
fib 1 = 1
fib x
    | x < 0 = error "argumento negativo"
    | otherwise = fib (x - 1) + fib (x - 2)

但现在，我想做一个函数叫“callsFib”，它必须计算它调用“fib”函数的次数，以便计算它的斐波纳契数.例如：
调用Fib（3）= 5，因为光纤（3）=光纤（2）+光纤（1）=光纤（1）+光纤（0）+光纤（0）