MoreCoq partway through compound destruct