fact: Definition zero_limit_succ_dec : forall alpha, ({alpha = zero} + {limitb alpha }) + {beta : t | alpha = succ beta} .
imports: Coq(Arith Compare_dec Lia) hydras(Simple_LexProd ON_Generic ON_mult ON_Omega Compat815)