Dave Jarvis' Repositories
git clone https://repo.autonoma.ca/repo/keenwrite.git
Retab
| Author | djarvis <email> |
|---|---|
| Date | 2018-05-10 15:19:05 GMT-0700 |
| Commit | 8bf3d85e3348d78ec4034d73096166ba524d8420 |
| Parent | fd93d8a |
| Delta | 53 lines added, 53 lines removed |
R/pluralise.R
| if( n != 1 ) { | ||
| if( pl.noninflective( s ) || | ||
| - pl.suffix( "es", s ) || | ||
| + pl.suffix( "es", s ) || | ||
| pl.suffix( "fish", s ) || | ||
| pl.suffix( "ois", s ) || | ||
 | ||
| pl.noninflective <- function( s ) { | ||
| v <- c( | ||
| - "aircraft", | ||
| - "Bhutanese", | ||
| - "bison", | ||
| - "bream", | ||
| - "Burmese", | ||
| - "carp", | ||
| - "chassis", | ||
| - "Chinese", | ||
| - "clippers", | ||
| - "cod", | ||
| - "contretemps", | ||
| - "corps", | ||
| - "debris", | ||
| - "djinn", | ||
| - "eland", | ||
| - "elk", | ||
| - "flounder", | ||
| - "fracas", | ||
| - "gallows", | ||
| - "graffiti", | ||
| - "headquarters", | ||
| - "high-jinks", | ||
| - "homework", | ||
| - "hovercraft", | ||
| - "innings", | ||
| - "Japanese", | ||
| - "Lebanese", | ||
| - "mackerel", | ||
| - "means", | ||
| - "mews", | ||
| - "mice", | ||
| - "mumps", | ||
| - "news", | ||
| - "pincers", | ||
| - "pliers", | ||
| - "Portuguese", | ||
| - "proceedings", | ||
| - "salmon", | ||
| - "scissors", | ||
| - "sea-bass", | ||
| - "Senegalese", | ||
| - "shears", | ||
| - "Siamese", | ||
| - "Sinhalese", | ||
| - "spacecraft", | ||
| - "swine", | ||
| - "trout", | ||
| - "tuna", | ||
| - "Vietnamese", | ||
| - "watercraft", | ||
| - "whiting", | ||
| - "wildebeest" | ||
| + "aircraft", | ||
| + "Bhutanese", | ||
| + "bison", | ||
| + "bream", | ||
| + "Burmese", | ||
| + "carp", | ||
| + "chassis", | ||
| + "Chinese", | ||
| + "clippers", | ||
| + "cod", | ||
| + "contretemps", | ||
| + "corps", | ||
| + "debris", | ||
| + "djinn", | ||
| + "eland", | ||
| + "elk", | ||
| + "flounder", | ||
| + "fracas", | ||
| + "gallows", | ||
| + "graffiti", | ||
| + "headquarters", | ||
| + "high-jinks", | ||
| + "homework", | ||
| + "hovercraft", | ||
| + "innings", | ||
| + "Japanese", | ||
| + "Lebanese", | ||
| + "mackerel", | ||
| + "means", | ||
| + "mews", | ||
| + "mice", | ||
| + "mumps", | ||
| + "news", | ||
| + "pincers", | ||
| + "pliers", | ||
| + "Portuguese", | ||
| + "proceedings", | ||
| + "salmon", | ||
| + "scissors", | ||
| + "sea-bass", | ||
| + "Senegalese", | ||
| + "shears", | ||
| + "Siamese", | ||
| + "Sinhalese", | ||
| + "spacecraft", | ||
| + "swine", | ||
| + "trout", | ||
| + "tuna", | ||
| + "Vietnamese", | ||
| + "watercraft", | ||
| + "whiting", | ||
| + "wildebeest" | ||
| ) | ||