Improve the formalization in Coq