(=> (Activity-Or-Spec ?X) (Or (Activity ?X) (Activity-Spec ?X)))
(<=> (Activity-Or-Spec ?X) (And (Eo-Entity ?X) (Or (Activity ?X) (Activity-Spec ?X))))