/*
simul efun add_a(string)
Adds "a " or "an " to the beginning of a string.
Rewritten by Radix : May 5, 1997
*/
string add_a(string s)
{
int c = s[0];
switch(c)
{
case 'a':
case 'e':
case 'i':
case 'o':
case 'u':
case 'y':
case 'A':
case 'E':
case 'I':
case 'O':
case 'U':
case 'Y':
return "an "+s;
default:
return "a "+s;
}
}