(* Hint Rewrite skipn_0 using computable : norm. *)

(* Specifications: *)
Lemma unfold_reptype_elim:
forall cs t v v',
JMeq v v' ->
@unfold_reptype cs t v = v'.
Lemma Zlength_default_val_Tarray_tuchar {cs} n a (N:0<=n): Zlength (@default_val cs (Tarray tuchar n a)) = n.