FUNCTION nondecreasing
(lr : LIST [0:?] OF REAL) : BOOLEAN;
IF NOT EXISTS (lr) THEN RETURN (FALSE); END_IF; REPEAT j := 2 TO SIZEOF (lr); IF lr[j] < lr[j-1] THEN RETURN (FALSE); END_IF; END_REPEAT; RETURN (TRUE);
END_FUNCTION; -- nondecreasing
public class FNondecreasing
public static Value run(SdaiContext _context, Value lr)