fact: Definition Qdlog2 (x : Q) : Z := match decide_rel (≤) x 1 with | left _ => -Z.log2_up (Qround.Qceiling (/x)) | right _ => Z.log2 (Qround.Qfloor x) end.
imports: Coq.ZArith.ZArith Coq.QArith.QArith Coq.QArith.Qround CoRN.stdlib_omissions.Q MathClasses.interfaces.abstract_algebra MathClasses.interfaces.additional_operations MathClasses.interfaces.orders MathClasses.theory.int_pow MathClasses.orders.rationals MathClasses.implementations.stdlib_rationals MathClasses.implementations.positive_semiring_elements