fact: Structure min_cycle_mod X (r : relation X) (f : nat -> X) (n : nat) : Prop := { mp_nonzero : n <> 0 ; mp_modulo : forall x, f x = f (x mod n) ; mp_step : forall i, r (f i) (f (S i)) ; mp_min : forall i j, r (f i) (f j) -> j mod n = (S i) mod n }.
imports: Arith micromega.Lia HahnBase HahnList HahnRelationsBasic HahnRewrite