(=> (and (equal ?B (OrganicObjectFn ?P)) (subclass ?B CoffeeBean) (subclass ?P Seed)) (initialPart ?P CoffeePlant)) |
Economy.kif 4629-4634 | |
(subclass CoffeePlant Shrub) | Economy.kif 4598-4598 | |
(subclass CoffeaArabica CoffeePlant) | Economy.kif 4611-4611 | |
(subclass CoffeaRobusta CoffeePlant) | Economy.kif 4617-4617 |