(* SCHEMA integrated_cnc_schema; *)
FUNCTION list_to_set (
l : LIST [0:?] OF GENERIC : T
) : SET OF GENERIC : T;
LOCAL
s : SET OF GENERIC : T := [];
END_LOCAL;
REPEAT i := 1 TO SIZEOF(l);
s := s + l[i];
END_REPEAT;
RETURN (s);
END_FUNCTION; -- 10303-42: topology_schema
|
Generated by STEP ToolsTM EXPRESS to HTML Converter
on 2010-01-12T10:42:26-02:00