plural

[procedure] plural n str

(def plural (n str)
  (if (or (is n 1) (single n))
      str 
      (string str "s")))