fact: Definition fact_in_coq : com := <{ Z := X; Y := 1; while Z <> 0 do Y := Y * Z; Z := Z - 1 end }>.
imports: Coq(Bool.Bool) Coq(Init.Nat) Coq(Arith.Arith) Coq(Arith.EqNat) Coq(Lia) Coq(Lists.List) Coq(Strings.String) LF(Maps)