concrete NeolithicEng of Neolithic = PaleolithicEng ** {
  lin
    Fire  = {s = "fire"} ;
    Wheel = {s = "wheel"} ;
    Think = {s = "thinks"} ;
}