abstract Gatherer = Paleolithic, Fish, Mushrooms ** {
    fun 
      UseFish     : Fish     -> CN ;
      UseMushroom : Mushroom -> CN ;
}