From b60f09401a15721f626bcb7c852f68b82fe39c1c Mon Sep 17 00:00:00 2001
From: wukong <wukong@longaeva>
Date: Sun, 3 May 2026 13:10:31 -0700
Subject: replaced sum[1-4].awk with serial and columnar versions; minor merge
 updates between fir_window scripts;

---
 sum.awk | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)
 create mode 100644 sum.awk

(limited to 'sum.awk')

diff --git a/sum.awk b/sum.awk
new file mode 100644
index 0000000..d8ebaf8
--- /dev/null
+++ b/sum.awk
@@ -0,0 +1,31 @@
+#!/usr/bin/awk -f
+
+### sum.awk
+# calculate sum of serialized input
+
+
+BEGIN {
+    OFS = FS
+    sign = "[+-]?"
+    decimal = "[0-9]+[.]?[0-9]*"
+    fraction = "[.][0-9]+"
+    exponent = "([Ee]" sign "[0-9]+)?"
+    number = "^" sign "(" decimal "|" fraction ")" exponent "$"
+}
+
+
+NF > 0 {
+    for (n=1; n<=NF; n++) {
+        if ($n ~ number) {
+            count += 1
+            sum += $n
+        }
+    }
+}
+
+
+END {
+    print "sum", "count"
+    print sum, count
+}
+
-- 
cgit v1.2.3