X-Git-Url: https://git.donarmstrong.com/?p=deb_pkgs%2Fscowl.git;a=blobdiff_plain;f=src%2Fsplit-words;fp=src%2Fsplit-words;h=0a9ad04d35a020b8c385c09abe3181abb22a8fd2;hp=aacd8ec61bb31a8b791d65cba075af05fe993628;hb=0005008332a39079bb30e5579181bf945545f993;hpb=6ca7497339c62dec1a9cc4d3f7e8eeb03e4be8a2 diff --git a/src/split-words b/src/split-words index aacd8ec..0a9ad04 100755 --- a/src/split-words +++ b/src/split-words @@ -44,9 +44,7 @@ comm -12 working/words.$1 working/australian_variant_1.lst \ comm -12 working/words.$1 working/australian_variant_2.lst \ > working/australian_variant_2-all.$1.pre -# # Hack to get australian only words in -# if [ $1 -eq 35 ] then mv working/australian-all.$1.pre working/australian-all.$1.pre.pre @@ -59,6 +57,28 @@ cat working/*-all.$1.pre \ | comm -13 - working/words.$1 \ > working/english-all.$1.pre +# Hack to get australian towns in +if [ $1 -eq 50 ] +then + mv working/australian-all.$1.pre working/australian-all.$1.pre.pre + cat r/special/australian-towns | src/add-possessive \ + | cat - r/special/australian-towns-part | src/filter \ + | sort -u \ + | comm -23 - working/english-all.$1.pre \ + | cat - working/australian-all.$1.pre.pre | sort -u > working/australian-all.$1.pre +fi + +# Hack to get U.S. Urban areas in +if [ $1 -eq 50 ] +then + mv working/american-all.$1.pre working/american-all.$1.pre.pre + cat r/special/urban-areas | src/add-possessive \ + | src/filter \ + | sort -u \ + | comm -23 - working/english-all.$1.pre \ + | cat - working/american-all.$1.pre.pre | sort -u > working/american-all.$1.pre +fi + for s in `src/list-spellings` do for c in `src/list-classes -1`