Ltac repable_signed := 
  idtac "Warning: repable_signed is deprecated;  use rep_omega"; rep_omega.Definition repable_signed_dec (z: Z) : {repable_signed z}+{~repable_signed z}.

(* Specifications: *)
Lemma repable_signed_mult2: forall i j, i<>0 -> (j <= Int.max_signed \/ i <> -1) -> repable_signed (i*j) -> repable_signed j.
Lemma repable_signed_mult1: forall i j, j<>0 -> (i <= Int.max_signed \/ j <> -1) -> repable_signed (i*j) -> repable_signed i.
Lemma force_signed_int_e: forall i, force_signed_int (Vint i) = Int.signed i.