initial sd-vbs

initial sd-vbs

add sd-vbs

sd-vbs

1 files changed, 22 insertions, 0 deletions

diff --git a/SD-VBS/common/matlab/randn.m b/SD-VBS/common/matlab/randn.m
new file mode 100644
index 0000000..e8eb473
--- /dev/null
+++ b/SD-VBS/common/matlab/randn.m
@@ -0,0 +1,22 @@
+%! _randn_f2_i1i1

+

+function retRand = randn(m,n)

+

+retRand = ones(m,n);

+

+for i=1:m

+    for j=1:n

+        w = 10;

+        while(w>=1.0)

+            x1 = 2.0 * rand(1,1) - 1.0;

+            x2 = 2.0 * rand(1,1) - 1.0;

+            w = x1*x1 + x2*x2;

+        end

+        w = sqrt((-2.0*log(w))/w);

+        retRand(i,j) = x1*w;

+    end

+end

+

+

+

+