Add "FAR vs PD"

FAR vs PD/untitled.m

@@ -0,0 +1,12 @@
+clc;
+clear;
+N = 100;
+F = dftmtx(N);
+F_inv = inv(F);
+
+result = zeros(N);
+for i = 1: N
+    for j = 1: N
+        result(i, j) = F_inv(i,:) * conj(F_inv(j,:))';
+    end
+end