Definition Qpositive_as_well_ordering :=
  Build_well_ordering Qpositive bin_lt bin_eq bin_lt_is_order
    bin_eq_is_equality bin_lt_is_wf bin_lt_is_well_def_rht.

(* Specifications: *)
Lemma qlt_wf_rec_without_zeros_and_One : forall P : Z -> Z -> Z -> Z -> Qpositive -> Prop, (forall (a b c d : Z_pos) (p : Qpositive), (forall (r s t u : Z_pos) (p1 : Qpositive), qlt r s t u p1 a b c d p -> P r s t u p1) -> P a b c d p) -> forall (a b c d : Z_pos) (p : Qpositive), P a b c d p.
Lemma homographicAcc_wf : forall (a b c d : Z) (p : Qpositive), (0 < a + b)%Z -> (0 < c + d)%Z -> (0 <= a)%Z -> (0 <= b)%Z -> (0 <= c)%Z -> (0 <= d)%Z -> homographicAcc a b c d p.