FUNCTION compute_total_depth
(* SCHEMA step_merged_ap_schema; *)
-- IN AP203e2/AP242
FUNCTION compute_total_depth
(swsrh : solid_with_stepped_round_hole ) : positive_length_measure;
LOCAL
i : positive_integer;
n : positive_integer := swsrh.segments;
td : positive_length_measure := swsrh.segment_depths[1];
END_LOCAL;
IF n = 1 THEN
RETURN (td);
ELSE
REPEAT i := 2 TO n;
td := td + swsrh.segment_depths[i];
END_REPEAT;
END_IF;
RETURN (td);
END_FUNCTION;
Referenced By
Defintion compute_total_depth is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2020-07-28T17:02:20-04:00