X-Git-Url: https://git.donarmstrong.com/deb_pkgs/scowl.git?a=blobdiff_plain;f=src%2Fsplit-words;h=aacd8ec61bb31a8b791d65cba075af05fe993628;hb=2f099b3d7a8fc3854c4e693224259a4070d8632b;hp=3e05f160341d6e7471dacbf74d6964023f623db5;hpb=b13ea8a082364672c6de2b010e558211ff52ec9a;p=deb_pkgs%2Fscowl.git diff --git a/src/split-words b/src/split-words index 3e05f16..aacd8ec 100755 --- a/src/split-words +++ b/src/split-words @@ -14,6 +14,9 @@ comm -12 working/words.$1 working/british_z.lst \ comm -12 working/words.$1 working/canadian.lst \ > working/canadian-all.$1.pre +comm -12 working/words.$1 working/australian.lst \ + > working/australian-all.$1.pre + comm -12 working/words.$1 working/variant_1.lst \ > working/variant_1-all.$1.pre @@ -35,6 +38,22 @@ comm -12 working/words.$1 working/canadian_variant_1.lst \ comm -12 working/words.$1 working/canadian_variant_2.lst \ > working/canadian_variant_2-all.$1.pre +comm -12 working/words.$1 working/australian_variant_1.lst \ + > working/australian_variant_1-all.$1.pre + +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 + cat r/special/australian.35 | src/filter \ + | cat - working/australian-all.$1.pre.pre | sort -u > working/australian-all.$1.pre +fi + cat working/*-all.$1.pre \ | sort | uniq \ | comm -13 - working/words.$1 \