Definition predta_compatible_compat_def (d0 : preDTA) : Prop :=
  forall d1 : preDTA, predta_compatible d0 d1 -> dta_compat d0 d1.

Lemma dta_compatible_compat : forall d0 d1 : DTA, dta_compatible d0 d1 -> DTA_compat d0 d1.