From 74ee91efdd1d12cb6e224ecc87f0cc51a51bcbc1 Mon Sep 17 00:00:00 2001
From: jofret
Date: Fri, 5 Jun 2009 15:31:48 +0000
Subject: Enable order comparison

---
 tests/unit_tests/test_double_OpLogNe.sci | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 tests/unit_tests/test_double_OpLogNe.sci

(limited to 'tests/unit_tests/test_double_OpLogNe.sci')

diff --git a/tests/unit_tests/test_double_OpLogNe.sci b/tests/unit_tests/test_double_OpLogNe.sci
new file mode 100644
index 00000000..64d582d8
--- /dev/null
+++ b/tests/unit_tests/test_double_OpLogNe.sci
@@ -0,0 +1,25 @@
+function test_double_OpLogNe()
+  a = 1;
+  b = 2 + %i;
+  c = [1 2 3]
+  d = %i * [1 2 3 4 5 6]
+  disp(a <> a); // d0d0OpLogEqd0
+  disp(a <> b); // d0z0OpLogEqd0
+  disp(a <> c); // d0d2OpLogEqd2
+  disp(a <> d); // d0z2OpLogEqd2
+
+  disp(b <> a); // z0d0OpLogEqd0
+  disp(b <> b); // z0z0OpLogEqd0
+  disp(b <> c); // z0d2OpLogEqd2
+  disp(b <> d); // z0z2OpLogEqd2
+
+  disp(c <> a); // d2d0OpLogEqd0
+  disp(c <> b); // d2z0OpLogEqd0
+  disp(c <> c); // d2d2OpLogEqd2
+  disp(c <> d); // d2z2OpLogEqd2
+  
+  disp(d <> a); // z2d0OpLogEqd0
+  disp(d <> b); // z2z0OpLogEqd0
+  disp(d <> c); // z2d2OpLogEqd2
+  disp(d <> d); // z2z2OpLogEqd2
+endfunction
-- 
cgit