proposition: Lemma traverse_my_value_var_is_identity: forall f, (forall l x, f l x = var x) -> forall (t : my_value) l, traverse f l t = t with traverse_my_term_var_is_identity: forall f, (forall l x, f l x = var x) -> forall (t : my_term) l, traverse f l t = t.
proof: Proof. prove_traverse_var_is_identity. prove_traverse_var_is_identity. Qed.
imports: Dblib.DblibTactics Dblib.DeBruijn