Merge branch 'upstream' into dfsg-orig

[debian/gnuradio] / gr-radar-mono / src / utils / read_avg_sec.m

diff --git a/gr-radar-mono/src/utils/read_avg_sec.m b/gr-radar-mono/src/utils/read_avg_sec.m
new file mode 100644 (file)
index 0000000..7aa7767
--- /dev/null
+++ b/gr-radar-mono/src/utils/read_avg_sec.m
@@ -0,0 +1,25 @@
+function avg = read_avg_sec(name, vlen)
+
+    f = fopen(name, "rb");
+    s = zeros(1, vlen);
+    n = 0;
+    m = 0;
+        
+    while (!feof(f))
+       t = fread(f, [2, vlen], "float");
+       if (size(t) == [2, vlen])
+          n = n+1;
+          c = t(1,:)+t(2,:)*j;
+          s = s+c;
+         m = m+1;        
+         if (m == 1000)
+            avg(n/1000,:) = s/1000;
+            s = zeros(1, vlen);
+            m = 0;
+         endif
+       endif
+    endwhile
+    
+    fclose(f);
+
+endfunction