Local Notation sgr := Num.sg.Definition ratz (n : int) := @Rat (n, 1) (coprimen1 _).Canonical rat_eqType := EqType rat rat_eqMixin.Canonical rat_choiceType := ChoiceType rat rat_choiceMixin.Canonical rat_countType := CountType rat rat_countMixin.

Lemma denq_gt0 x : 0 < denq x.