(* SCHEMA step_merged_ap_schema; *)
-- IN AP214 FUNCTION check_associative_shape_aspects (sdr : shape_definition_representation ) : BOOLEAN; LOCAL sr1 : SET OF representation; sr2 : SET OF representation; dm : SET OF representation; pv : SET OF representation; END_LOCAL; IF SIZEOF(sdr.used_representation.items) <> 2 THEN RETURN (FALSE); END_IF; sr1 := using_representations(sdr.used_representation.items[1]); sr2 := using_representations(sdr.used_representation.items[2]); REPEAT i := 1 TO HIINDEX(sr1); dm := representations_mapped_into(sr1[i]); REPEAT j := 1 TO HIINDEX(dm); IF 'STEP_MERGED_AP_SCHEMA.DRAUGHTING_MODEL' IN TYPEOF(dm[j]) THEN IF dm[j] IN sr2 THEN RETURN (TRUE); END_IF; pv := representations_mapped_into(dm[j]); REPEAT k := 1 TO HIINDEX(pv); IF 'STEP_MERGED_AP_SCHEMA.PRESENTATION_VIEW' IN TYPEOF(pv[k]) THEN IF pv[k] IN sr2 THEN RETURN (TRUE); END_IF; END_IF; END_REPEAT; END_IF; END_REPEAT; END_REPEAT; REPEAT i := 1 TO HIINDEX(sr2); dm := representations_mapped_into(sr2[i]); REPEAT j := 1 TO HIINDEX(dm); IF 'STEP_MERGED_AP_SCHEMA.DRAUGHTING_MODEL' IN TYPEOF(dm[j]) THEN IF dm[j] IN sr1 THEN RETURN (TRUE); END_IF; pv := representations_mapped_into(dm[j]); REPEAT k := 1 TO HIINDEX(pv); IF 'STEP_MERGED_AP_SCHEMA.PRESENTATION_VIEW' IN TYPEOF(pv[k]) THEN IF pv[k] IN sr1 THEN RETURN (TRUE); END_IF; END_IF; END_REPEAT; END_IF; END_REPEAT; END_REPEAT; RETURN (FALSE); END_FUNCTION;
[Top Level Definitions] [Exit]
Generated by STEP Tools® EXPRESS to HTML Converter
2024-09-06T14:00:33-04:00