coq - x >= a /\ x <= a -> x = a の証明

Question

次のことを証明するにはどうすればよいでしょうか

Theorem T: forall x, a: nat, x >= a /\ x <= a -> x = a.

コックで？