|
FUNCTION cg_get_sz_lapgc (input : SET [1:?] OF linear_array_placement_group_component_link) : INTEGER; LOCAL ac : SET OF linear_array_placement_group_component_armx := [ ] ; END_LOCAL ; REPEAT i := 1 TO HIINDEX ( input ) ; ac := ac + input [ i ] \ linear_array_placement_group_component_link . precedent_element + input [ i ] \ linear_array_placement_group_component_link . subsequent_element ; END_REPEAT ; RETURN ( SIZEOF ( ac ) ) ; END_FUNCTION; -- cg_get_sz_lapgc |
|
public class FCg_get_sz_lapgc public static Value run(SdaiContext _context, Value input) |