(=> (and (equal ?C (OrganicObjectFn ?S)) (subclass ?C CocoaBean) (subclass ?S Seed)) (initialPart ?S CocoaTree)) |
Economy.kif 4693-4699 | |
(subclass CocoaBean Seed) | Economy.kif 4686-4686 | CocoaBean e' uma sub-classe de Seed |
(subclass CocoaBean PlantSubstance) | Economy.kif 4687-4687 | CocoaBean e' uma sub-classe de PlantSubstance |