re-init

1 files changed, 16 insertions, 0 deletions

diff --git a/sum2.awk b/sum2.awk
new file mode 100644
index 0000000..0b2aad3
--- /dev/null
+++ b/sum2.awk
@@ -0,0 +1,16 @@
+### sum2.awk, print column sums
+# check that each line has the same number of fields as line one
+
+NR==1 { nfld = NF }
+
+{
+    for (i=1; i<=NF; i++)
+        sum[i] += $i
+    if (NF != nfld)
+        print "line " NR " has " NF " entries, not " nfld
+}
+
+END {
+    for (i=1; i<=NF; i++)
+        printf("%g%s", sum[i], i < nfld ? "  " : "\n")
+}