Overview Schemas Index

ANALYSIS_SCHEMA (jsdai.SAnalysis_schema)


FUNCTION temporal_spatial_domain_for_model
          (domain : numerical_model) : BOOLEAN;

LOCAL
      spatial_set : SET  OF  spatial_decomposition_of_numerical_model;
      behavioural_set : SET  OF  behavioural_decomposition_of_numerical_model;
      domains : SET OF  numerical_model := [];
      viewing : BAG  OF  view_relationship;
      spatial_bag : BAG  OF  spatial_decomposition_of_numerical_model;
      behavioural_bag : BAG OF behavioural_decomposition_of_numerical_model;
    END_LOCAL;

    viewing := USEDIN(domain, 'ANALYSIS_PRODUCT_RELATIONSHIPS_SCHEMA.VIEW_RELATIONSHIP.VIEW');
    IF  SIZEOF(viewing) > 0 THEN
      RETURN  (TRUE);
    END_IF;
    spatial_bag := USEDIN(domain, 'ANALYSIS_SCHEMA.SPATIAL_DECOMPOSITION_OF_NUMERICAL_MODEL.PARTS');
    IF  SIZEOF(spatial_bag) > 0 THEN
      spatial_set := bag_to_set(spatial_bag);
      REPEAT  i := 1 TO  HIINDEX(spatial_set);
        domains := domains + spatial_set[i].whole;
      END_REPEAT;
    END_IF;
    behavioural_bag := USEDIN(domain, 'ANALYSIS_SCHEMA.BEHAVIOURAL_DECOMPOSITION_OF_NUMERICAL_MODEL.PARTS');
    IF  SIZEOF(behavioural_bag) > 0 THEN
      behavioural_set := bag_to_set(behavioural_bag);
      REPEAT  i := 1 TO  HIINDEX(behavioural_set);
        domains := domains + behavioural_set[i].whole;
      END_REPEAT;
    END_IF;
    IF  SIZEOF(domains) > 0 THEN
      REPEAT i := 1 TO HIINDEX(domains);
        IF temporal_spatial_domain_for_model(domains[i]) THEN
          RETURN  (TRUE);
        END_IF;
      END_REPEAT;
    END_IF;
    RETURN (FALSE);

END_FUNCTION; -- temporal_spatial_domain_for_model

public class FTemporal_spatial_domain_for_model
          public static Value run(SdaiContext _context, Value domain)