(=> (Subcomponent-Of $X $Y) (Component $Y))
(=> (Subcomponent-Of $X $Y) (Component $X))
(=> (Connected-Components $X $Y) (Component $Y))
(=> (Connected-Components $X $Y) (Component $X))
(Exists (?A ?B)
(And (Component ?A)
(Component ?B)
(Connects-Components ?X ?A)
(Connects-Components ?X ?B)
(Connected-Components ?A ?B)))
(<=> (Connection ?X)
(And (Component ?X)
(Exists (?A ?B)
(And (Component ?A)
(Component ?B)
(Connects-Components ?X ?A)
(Connects-Components ?X ?B)
(Connected-Components ?A ?B)))))
(=> (Connects-Components $X $Y) (Component $Y))
(=> (Has-Subpart-Slot $X $Y) (Component $X))
(<= (Range $X Component) (Subpart-Slot $X))
(Inherited-Slot-Value Subpart-Slot Range Component)
(<= (Domain $X Component) (Subpart-Slot $X))
(Inherited-Slot-Value Subpart-Slot Domain Component)
(=> (Subpart-Slot ?Unary-Function)
(And (Domain ?Unary-Function Component)
(Range ?Unary-Function Component)))