Definition Qpositive2_as_well_ordering :=
  Build_well_ordering Qpositive2 bin2_lt bin2_eq bin2_lt_is_order
    bin2_eq_is_equality bin2_lt_is_wf bin2_lt_is_well_def_rht.

Lemma quadraticAcc_wf : forall (a b c d e f g h : Z) (p1 p2 : Qpositive), (0 < a + b + c + d)%Z -> (0 < e + f + g + h)%Z -> (0 <= a)%Z -> (0 <= b)%Z -> (0 <= c)%Z -> (0 <= d)%Z -> (0 <= e)%Z -> (0 <= f)%Z -> (0 <= g)%Z -> (0 <= h)%Z -> quadraticAcc a b c d e f g h p1 p2.