Instance CompSpecs : compspecs. make_compspecs prog. Defined.
Definition Vprog : varspecs.  mk_varspecs prog. Defined.
Definition Gprog: funspecs := nil.
Definition Delta1 : tycontext :=
ltac:(let x := constr:(func_tycontext f_sumarray Vprog Gprog nil)
in let y := eval hnf in x
in exact y).

(* These examples of [rep_omega] are from is from the "Integers: nat, Z, int" chapter of the Verifiable C Reference Manual *)
Lemma exercise2:
forall x,
Int.min_signed <= x <= Int.max_signed ->
Int.signed (Int.repr x) = x.