X-Git-Url: https://git.donarmstrong.com/?p=deb_pkgs%2Fscowl.git;a=blobdiff_plain;f=src%2Fmake-known-upper.lst;fp=src%2Fmake-known-upper.lst;h=289893f11f1189c08e77a0ae6e90298d62720253;hp=0000000000000000000000000000000000000000;hb=b13ea8a082364672c6de2b010e558211ff52ec9a;hpb=01534a94130c1f5a3a230cf4fe18365a235ba271

diff --git a/src/make-known-upper.lst b/src/make-known-upper.lst
new file mode 100755
index 0000000..289893f
--- /dev/null
+++ b/src/make-known-upper.lst
@@ -0,0 +1,12 @@
+#!/bin/sh
+
+cat l/upper/*                                      \
+  | src/filter                                     \
+  | grep "^[A-Z]"                                  \
+  | src/find-ss working/all.lst                    \
+  | sort -u                                        \
+  | comm -23 - r/special/not-upper                 \
+  | src/add-other-spellings                        \
+  | sort -u                                        \
+  > working/known-upper.lst
+