--- a/LMathLib.def
+++ b/LMathLib.def
@@ -93,12 +93,14 @@
(* groessere ganze Zahl aufgerundet. Entspricht Rundung gegen *)
(* Plus Unendlich (Aufrundungsfunktion). *)
(* *)
- (* Returns the least integer greater than or equal to X. *)
+ (* Returns the least integer greater than or equal to X, that is *)
+ (* it return the smallest integral value that is not less than x *)
(* *)
(* Beispiele / examples: *)
(* *)
(* ceil(-1.5) = -1.0, ceil(1.5) = 2.0 *)
(* ceil(-1.0) = -1.0, ceil(1.0) = 1.0 *)
+ (* *)
(*----------------------------------------------------------------*)
PROCEDURE entier(X : LONGREAL) : INTEGER;
@@ -124,6 +126,8 @@
(* This function is equal to the entier function defined in the *)
(* "Revised report on the algorithmic language Algol 60", *)
(* sec. 3.2.5. *)
+ (* *)
+ (* Equivalent to LongMath.round *)
(*----------------------------------------------------------------*)
PROCEDURE CardPot(x : LONGREAL;