Overview Schemas Index

PARAMETERIZATION_SCHEMA (jsdai.SParameterization_schema)


FUNCTION make_numeric_set
          (start : maths_number, delta : maths_number, incs : positive_integer) : SET [2:?] OF maths_number;

LOCAL
    i : INTEGER;
    numeric_set : SET[2:?] OF maths_number := [start, (start + delta)];
  END_LOCAL;

  IF incs > 1 THEN REPEAT i := 2 TO incs;
                     numeric_set := numeric_set + (start + (i*delta));
                   END_REPEAT;
  END_IF;
  RETURN(numeric_set);

END_FUNCTION; -- make_numeric_set

public class FMake_numeric_set
          public static Value run(SdaiContext _context, Value start, Value delta, Value incs)