From 6a320264c2de3d6dd8cc1d1327b3c30df4c8cb26 Mon Sep 17 00:00:00 2001
From: Siddhesh Wani
Date: Mon, 25 May 2015 14:46:31 +0530
Subject: Original Version

---
 .../tests/unit_tests/float/test_float_variance.sci | 32 ++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 2.3-1/tests/unit_tests/float/test_float_variance.sci

(limited to '2.3-1/tests/unit_tests/float/test_float_variance.sci')

diff --git a/2.3-1/tests/unit_tests/float/test_float_variance.sci b/2.3-1/tests/unit_tests/float/test_float_variance.sci
new file mode 100644
index 00000000..fae69a1b
--- /dev/null
+++ b/2.3-1/tests/unit_tests/float/test_float_variance.sci
@@ -0,0 +1,32 @@
+//SCI2C: DEFAULT_PRECISION= FLOAT
+function test_float_variance()
+  d0 = 0.2113249
+  d2 = [0.2113249 0.0002211 0.6653811;0.7560439 0.4453586 0.6283918]
+  z0 = d0 + %i * d0
+  z2 = d2 + %i * d2
+  
+  //disp(variance(d0))
+  //disp(variance(z0))
+  disp(variance(d2))
+  disp(variance(z2))
+
+  //disp(variance(d0, 1))
+  //disp(variance(z0, 1))
+  disp(variance(d2, 1))
+  disp(variance(z2, 1))
+
+  //disp(variance(d0, 2))
+  //disp(variance(z0, 2))
+  disp(variance(d2, 2))
+  disp(variance(z2, 2))
+  
+//disp(variance(d0, 'r'))
+//disp(variance(z0, 'r'))
+disp(variance(d2, 'r'))
+disp(variance(z2, 'r'))
+
+//disp(variance(d0, 'c'))
+//disp(variance(z0, 'c'))
+disp(variance(d2, 'c'))
+disp(variance(z2, 'c'))
+endfunction
-- 
cgit