Overview Schemas Index

NETWORK_FUNCTIONAL_DESIGN_VIEW_XIM (jsdai.SNetwork_functional_design_view_xim)


FUNCTION consistent_bus_structural_definition
          (input : SET [0:?] OF bus_element_link_armx) : BOOLEAN;

 LOCAL vertex : SET OF bus_structural_definition_or_node := [ ] ; edge : INTEGER  := SIZEOF  ( input ) ; vc : INTEGER  := 0 ; vertex_degree : INTEGER := 0 ; END_LOCAL ; REPEAT  i := 1 TO  SIZEOF  ( input ) BY  1 ; vertex := vertex + input [ i ] . precedent_element ; vertex := vertex + input [ i ] . subsequent_element ; END_REPEAT  ; vc := SIZEOF  ( vertex ) ; IF  ( vc <> ( edge + 1 ) ) THEN  RETURN  ( FALSE  ) ; END_IF  ; REPEAT  i := 1 TO  vc BY  1 ; vertex_degree := 0 ; REPEAT j := 1 TO SIZEOF ( input ) BY 1 ; IF  input [ j ] . precedent_element = vertex [ i ] THEN  vertex_degree := vertex_degree + 1 ; END_IF  ; IF  input [ j ] . subsequent_element = vertex [ i ] THEN  vertex_degree := vertex_degree + 1 ; END_IF  ; END_REPEAT  ; IF ( vertex_degree > 2 ) THEN RETURN  ( FALSE ) ; END_IF ; END_REPEAT ; RETURN ( TRUE ) ; 

END_FUNCTION; -- consistent_bus_structural_definition

public class FConsistent_bus_structural_definition
          public static Value run(SdaiContext _context, Value input)