(* SCHEMA associative_draughting; *)
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) BY 1;
loops := loops + f.bounds[i].bound;
END_REPEAT;
RETURN(loops);
END_FUNCTION; -- list_face_loops
|
Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:14:12-04:00