summaryrefslogtreecommitdiff
path: root/hamming.awk
diff options
context:
space:
mode:
authorwukong <wukong@longaeva>2018-11-12 22:35:51 -0800
committerwukong <wukong@longaeva>2018-11-12 22:35:51 -0800
commit7ab9ca8f57c44e812d3c782209a9e600dc513fbc (patch)
tree6be3ffecc7887d2d3a80d20ec907f955686e08df /hamming.awk
parenta8064e8a631ed4ff1655575fe60423353fbc2b82 (diff)
added optional precision argv to other scripts;
Diffstat (limited to '')
-rw-r--r--hamming.awk12
1 files changed, 7 insertions, 5 deletions
diff --git a/hamming.awk b/hamming.awk
index fd6d89c..f7ff9f7 100644
--- a/hamming.awk
+++ b/hamming.awk
@@ -7,14 +7,16 @@
BEGIN {
- ### R.W. Hamming, "Digital Filters"
- # H = "0.23 0.54 0.23"
+ ARGV[1] ? N = ARGV[1] : N = 0
+ ARGV[2] ? OFMT = "%." ARGV[2] "g" : OFMT = "%g"
- N = ARGV[1]
# window interval goes from -M to M
M = 0.5*(N - 1)
pi = 4*atan2(1,1)
+ ### R.W. Hamming, "Digital Filters"
+ # H = "0.23 0.54 0.23"
+
a0 = (25.0/46.0)
a1 = (21.0/46.0)
@@ -29,10 +31,10 @@ BEGIN {
for (n=-M; n<=M; n++) {
if (N > 1 && M > 0) {
w[n] = a0 + a1*cos((pi*n)/M)
- print n, w[n]/M
+ print n + M, w[n]/M
}
else {
- print n, 1.0
+ print n + M, 1.0
}
}