Method code for $english_lib._noun_singular()

[Turn off line numbering]

---

  1: arg string;
  2: var k;
  3: 
  4: anticipate_assignment();
  5: if ((k = string in noun_exceptions.values()))
  6:     return (noun_exceptions.keys())[k];
  7: return ._remove_s(string);

---

// Created 11-Nov-1996 as a part of ColdCore, see: @help Credit