FUNCTION list_to_array
(* SCHEMA integrated_cnc_schema; *)
FUNCTION list_to_array (
lis : LIST [0:?] OF GENERIC : T;
low : INTEGER;
u : INTEGER
) : ARRAY [low:u] OF GENERIC : T;
LOCAL
n : INTEGER;
res : ARRAY [low:u] OF GENERIC : T;
END_LOCAL;
n := SIZEOF(lis);
IF n <> u - low + 1 THEN
RETURN (?);
ELSE
res := [ lis[1] ];
REPEAT i := 2 TO n;
res[(low + i - 1)] := lis[i];
END_REPEAT;
RETURN (res);
END_IF;
END_FUNCTION; -- 10303-42: geometry_schema
Referenced By
Defintion list_to_array is references by the following definitions:
[Top Level Definitions] Generated by STEP ToolsTM EXPRESS to HTML Converter
on 2010-01-12T10:42:26-02:00