fact: Definition sumboolb {A B : Prop} (x : @sumbool A B) : bool := if x then true else false.
imports: OrderedRing QMicromega RingMicromega Refl Sumbool Raxioms Rfunctions RIneq Rpow_def QArith Qfield Qreals DeclConstant EnvRing