fact: Fixpoint fibo_rec n := if n is m.+1 then if m is k.+1 then fibo_rec k + fibo_rec m else 1 else 1.
imports: ZArith mathcomp(all_ssreflect) infotheo(ssrZ) monad_model HB(structures) monae_lib hierarchy monad_lib typed_store_lib