(***********************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* N->N. Parameter S:N->N. (** Relations, equality is defined separately *) Parameter lt,le,gt,ge:N->N->Prop.