summaryrefslogtreecommitdiff
path: root/sum3.awk
diff options
context:
space:
mode:
authorwukong <wukong@longaeva>2026-05-03 13:10:31 -0700
committerwukong <wukong@longaeva>2026-05-03 13:10:31 -0700
commitb60f09401a15721f626bcb7c852f68b82fe39c1c (patch)
tree0fa5ed72ec96c8b0cc83699a0497761c9ec0eed7 /sum3.awk
parente3f9ccd5303c516d2e1c48112d8b52609ce4ad5e (diff)
replaced sum[1-4].awk with serial and columnar versions;
minor merge updates between fir_window scripts;
Diffstat (limited to '')
-rw-r--r--sum3.awk39
1 files changed, 0 insertions, 39 deletions
diff --git a/sum3.awk b/sum3.awk
deleted file mode 100644
index 7f11a49..0000000
--- a/sum3.awk
+++ /dev/null
@@ -1,39 +0,0 @@
-#!/usr/bin/awk -f
-
-### sum3.awk, print sums of numeric columns
-# input: rows of integers and strings
-# output: sums of numeric columns
-# assumes every line has same layout
-
-
-function isnum(n) {
- return n ~ /^[+-]?[0-9]+$/
-}
-
-
-BEGIN {
- OFS = FS
-}
-
-
-NR == 1 {
- for (i=1; i<=NF; i++)
- numcol[i] = isnum($i)
-}
-
-
-NF > 0 {
- (NF > nf_max) ? nf_max = NF : nf_max = nf_max
- for (i=1; i<=NF; i++)
- if (numcol[i])
- sum[i] += $i
-}
-
-
-END {
- for (i=1; i<=nf_max; i++) {
- printf(numcol[i] ? sum[i] : "--")
- printf(i < nf_max ? OFS : ORS)
- }
-}
-