Added codegen folder and scripts for fracF operating in DPW (matrix)

2026-06-09 16:15:39 -03:00
parent 22c51e1597
commit f64f4fde31
18 changed files with 185 additions and 0 deletions
--- a/codegen_fracFdpw/TBc_fracFdpw.m
+++ b/codegen_fracFdpw/TBc_fracFdpw.m
@@ -0,0 +1,20 @@
+a = single(1);
+
+[Achirp,AchirpOut,H,scale] = fracF_init(a);
+
+X = complex(randn(1024,1024,'single'), ...
+            randn(1024,1024,'single'));
+
+Fdpw = fracF_dpw(X,...
+                 Achirp,...
+                 AchirpOut,...
+                 H,...
+                 scale);
+
+Fref = complex(zeros(512,64,'single'));
+
+for k = 1:1024
+    Fref(:,k) = fracF_cg(X(:,k),a);
+end
+
+maxErr = max(abs(Fdpw(:)-Fref(:)))