(* Lemma Int64_eq_repr_int_nonzero: forall s i, Int.eq i Int.zero = false -> Int64.eq (cast_int_long s i) Int64.zero = false. *)

Lemma sizeof_range_true {CS: composite_env}: forall t A (a b: A) (max: Z),
negb (Z.eqb (sizeof t) 0) = true ->
Z.leb (sizeof t) max = true ->
(if zlt 0 (sizeof t) && zle (sizeof t) max then a else b) = a.