let pluralise s n = match abs n with 0|-> s | _ -> s^"s"