fact: Definition gapless h := forall k, 0 < k <= last_key h -> k \in dom h.
imports: Coq(ssreflect ssrbool ssrfun) mathcomp(ssrnat eqtype seq path interval) pcm(options prelude pred finmap rtc seqext useqord uslice uconsec)