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