(* DIFFERENCE IN AN INTERVAL *)
Definition diff_int
(m:fmap)(z:dart)(a b:nat): Prop:=
forall i j : nat, (a <= i /\ i < j /\ j <= b)%nat ->
Iter (f m) i z <> Iter (f m) j z.

(* Specifications: *)
Lemma diff_int_le:forall(m:fmap)(z:dart)(a b:nat),
(b <= a)%nat -> diff_int m z a b.
Lemma diff_int_dec:forall(m:fmap)(z:dart)(a b:nat),
{diff_int m z a b} + {~diff_int m z a b}.