add flatwords script. "Flat" is not a flatword

1 files changed, 8 insertions, 0 deletions

diff --git a/flatwords/flats.sh b/flatwords/flats.sh
new file mode 100755
index 0000000..7b36e78
--- /dev/null
+++ b/flatwords/flats.sh
@@ -0,0 +1,8 @@
+# Make a list of 'flat' words.
+# A flat word is comprised only of letters that do not have risers or descenders
+#
+#   SJP 1 Jan 2021
+
+flats=aceimnorsuvwxz
+
+grep -ix "[${flats}]*" < words | awk '{print tolower($0)}' | sed -rn '/^.{3,99}/p' > flatwords.txt