(****************************************************************************  IEEE754  :  Fprop  Laurent Thery  ******************************************************************************)
Require Export Fbound.
Section Fprop.
Variable radix : Z.
Hypothesis radixMoreThanOne : (1 < radix)%Z.
Let FtoRradix := FtoR radix.
Local Coercion FtoRradix : float >-> R.
Variable b : Fbound.

Theorem SterbenzAux :
forall x y : float,
Fbounded b x ->
Fbounded b y ->
(y <= x)%R -> (x <= 2%nat * y)%R -> Fbounded b (Fminus radix x y).