ГОС! Р ИСО 10303-203-2003
ENTITY changc_rcquest
SUBTYPE OF <aclion_rcqucsi_as»ignmcnt>;
items: SET (!:?) OF changc_request_itcm:
END_ENTITY; - - changerequcst
ENTITY circle
SUBTYPE OF (conic);
radius: positivc lcngth mcasure;
END_ENTITY; - - circle
ENTITY closed_shcll
SUBTYPE OF <connected_face_set);
END_EN1 ITY; - - closed_shell
ENTITY composite_curvc
SUBTYPE OF (boundcd_curvc) ;
segments : LIST 11:?| OF compositccurvcscgment;
self_intersect: LOGICAL;
DERIVE
n_scgmcnts: INTEGER :■ SIZEOF(scgmcnLs);
closcd_curvc: LOGICAL :** scgmcnts|n_scgmcnts|.transition < >
discontinuous ;
WHERE
wrl: (((NOT dosed_curve) AND (SIZEOF(QUERY ( temp <* segments | (
temp.transition = discontinuous) )) = 1)) OR (closed_curve
AND (SIZEOF(QlJERY ( temp <• segments | (temp.transition »
discontinuous) )) = 0))):
END_ENTITY; - - compositc_curve
ENTITY compositc_curvc_on_surface
SUPERTYPE OF (boundary_curvc)
SUBTYPE OF (compo&ite_curve);
DERIVE
basis_surface : SET |0:2] OF surface := get_basis_surfacc(SELF);
WHERE
wrl: (SlZEOF(basis_surfacc) > 0);
wr2: constraints_compositc_curve_on_surfacc(SELF) ;
END_ENTITY; - - composjtc_curvc_on_xurfacc
ENTITY composite_curvc_segmcnt
SUBTYPE OF (founded_itcm) ;
transition: transilion_codc:
same sense: BOOLEAN;
parent_cur\c: curve ;
INVERSE
using curves: BAG |l:?| OF composite_curve FOR segments;
WHERE
wrl: (‘CONFIG_CONTROL_DESIGN.BOUNDED_CURVE’ IN TYPEOF <parcnt_curvc)>;
END_ENTITY; - - compositc_curvc_segmcnt
ENTITY conliguration design;
configuration: configuration itcm;
design: product_dcfinilion_fonnation;
UNIQUE
url: configuration, design;
END_ENTITY: - - configuration_design
ENTITY configuration_e(fectivity
SUBTi’PE OF (product_definition_effcctivity) ;
configuration: configuration_dcsign:
136