fact: Definition Rrat : rat -> Q int pos -> Type := fun_hrel Qint_to_rat.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq zmodp) mathcomp(path choice fintype tuple finset bigop order) mathcomp(ssralg ssrint ssrnum rat) CoqEAL(hrel param refinements pos)