Let eq_dec_option_Z : EqDec (option Z). repeat t. Qed.
Let eq_dec_typelist : EqDec typelist. repeat t. Qed.

(* Specifications: *)
Lemma eq_dec_expr : EqDec expr.
Lemma eq_dec_labeled_statements : forall l l' : labeled_statements, { l = l' } + { l <> l' }.
End eq_dec.