(<= (type ?x ?c) (and (domain ?prop ?c) (:has-slot ?x ?prop)))