From db464f35f5a10b58d9ed1085e0b462689adee583 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_Spec.sci | 42 ++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 tests/unit_tests/float/test_float_Spec.sci

(limited to 'tests/unit_tests/float/test_float_Spec.sci')

diff --git a/tests/unit_tests/float/test_float_Spec.sci b/tests/unit_tests/float/test_float_Spec.sci
new file mode 100644
index 00000000..42041925
--- /dev/null
+++ b/tests/unit_tests/float/test_float_Spec.sci
@@ -0,0 +1,42 @@
+//SCI2C: DEFAULT_PRECISION= FLOAT
+function test_float_Spec()
+
+
+	disp(spec(45)) ; // d0Spec
+	disp(spec(4+3*%i)); // z0Spec
+	
+	a = [1 2 3; -4 5 98 ; 7 8 5] ;
+	b = [1 2 3; -4 5 98 ; 7 -100000 5] ;
+
+
+	disp(spec(a));
+	disp(spec(b));
+
+	disp(spec(a*%i));
+ // 2 outputs
+
+	[aa bb] = spec(45) ; // d0Spec
+	disp(aa);
+	disp(bb);
+	
+ 	[cc dd] = spec(4+3*%i); // z0Spec
+	
+	disp(cc);
+	disp(dd);
+
+	a = [1 2 3; -4 5 98 ; 7 8 5] ;
+	b = [1 2 3; -4 5 98 ; 7 -100000 5] ;
+
+
+	[ee ff] = spec(a);
+	disp(ee);
+	disp(ff);
+	[gg hh] = spec(b);
+	disp(gg);
+	disp(hh);
+
+	[ii jj] = spec(a*%i);
+	disp(ii);
+	disp(jj);
+
+endfunction
-- 
cgit