Switch to side-by-side view
--- a/LMathLib.def +++ b/LMathLib.def @@ -349,4 +349,10 @@ (* Berechne d. Maschinengenauigkeit / calculate machine precision *) (*----------------------------------------------------------------*) +PROCEDURE SmallR4() : LONGREAL; + + (*----------------------------------------------------------------*) + (* Berechne eine kleine REAL4 - Zahl / calculate small real value *) + (*----------------------------------------------------------------*) + END LMathLib.