case (sumbool_of_bool (Dle d d')); intro H'; rewrite H'; auto.
Qed.
Hint Resolve Dle_true_Dmin Dle_inv_Dmin.

Lemma Dmin_le_3 :
forall d d' d'' : D, Dle d (Dmin d' d'') = true -> Dle d d' = true.