suspend doing in coq, on paper first