src/make-known-upper.lst

   1 #!/bin/sh
   2
   3 cat l/upper/*                                      \
   4   | src/filter                                     \
   5   | grep "^[A-Z]"                                  \
   6   | src/find-ss working/all.lst                    \
   7   | sort -u                                        \
   8   | comm -23 - r/special/not-upper                 \
   9   | src/add-other-spellings                        \
  10   | sort -u                                        \
  11   > working/known-upper.lst
  12