fact: Definition div_it_terminates : forall n m:nat, 0 < m -> {v:nat*nat | exists p:nat, (forall k:nat, p < k -> forall g:nat->nat->nat*nat, iter k div_it_F g n m = v)}.
imports: ZArith List Arith Lia Zwf Relations Inverse_Image Transitive_Closure chap9