Overview Schemas Index

SOLID_SHAPE_ELEMENT_SCHEMA (jsdai.SSolid_shape_element_schema)


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; -- compute_total_depth

public class FCompute_total_depth
          public static Value run(SdaiContext _context, Value swsrh)