Nearly 80% done from MoreCoq.v