Overview Schemas Index

FINITE_ELEMENT_ANALYSIS_CONTROL_AND_RESULT_SCHEMA (jsdai.SFinite_element_analysis_control_and_result_schema)


FUNCTION consistent_set_values
          (values_and_locations : SET [1:?] OF GENERIC; variable : GENERIC) : BOOLEAN;

LOCAL
     vv_type                : STRING;
     fv_type                : SET [1:?] OF STRING;
     i                      : INTEGER;
    END_LOCAL;

    vv_type := variable_value_type (variable);

    REPEAT i := 1 TO HIINDEX (values_and_locations);

       fv_type := TYPEOF (values_and_locations[i].simple_value);

       IF  NOT  (('FINITE_ELEMENT_ANALYSIS_CONTROL_AND_RESULT_SCHEMA.' +
           'UNSPECIFIED_VALUE') IN  fv_type) THEN

          IF NOT (vv_type IN fv_type) THEN
             RETURN  (FALSE);
          END_IF;

       END_IF;

    END_REPEAT;

    RETURN (TRUE);

END_FUNCTION; -- consistent_set_values

public class FConsistent_set_values
          public static Value run(SdaiContext _context, Value values_and_locations, Value variable)