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

    vv_type := variable_value_type (variable);

    fv_type := TYPEOF (c_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;

    RETURN (TRUE);