fact: Fixpoint NumberToString_rec (fuel: nat) (n: nat) := match fuel with | O => "" | S fuel => match (lt_dec n 10) with | left pr => DigitToString (exist _ n pr) | right pr => append (NumberToString_rec fuel (n / 10)) (NumberToString_rec fuel (n mod 10)) end end.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.Numbers.Natural.Peano.NPeano Coq.Strings.String Coq.Arith.Lt Coq.Arith.Compare_dec Coq.Lists.List Coq.ZArith.ZArith