(* SCHEMA topology_schema; *)
FUNCTION list_face_loops(f: face) : LIST[0:?] OF loop;
LOCAL
loops : LIST[0:?] OF loop := [];
END_LOCAL;
REPEAT i := 1 TO SIZEOF(f.bounds);
loops := loops +(f.bounds[i].bound);
END_REPEAT;
RETURN(loops);
END_FUNCTION;
|
Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:13:58-04:00