summaryrefslogtreecommitdiff
path: root/tests/unit_tests/double/test_OpLogNot.sci
blob: 70ef4969c00b4e73f5ea85a27ae8cf3b6ff39d35 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
function test_OpLogNot()
// test OpLogNot

  disp(~(-2))
  disp(~(0))
  disp(~(3))

  disp(~(0-2*%i))
  disp(~(0+0*%i))
  disp(~(0+3*%i))
  disp(~(3-5*%i))
  disp(~(3+0*%i))
  disp(~(3+6*%i))

  a=[-1 2 3; 0 -1 4; 2 -0 5];

  disp(~(a))

  b=[0+3*%i 2-%i 1 ; 0-2*%i 2+2*%i 1-%i; 0+0*%i 4+0*%i 5-0*%i]

  disp(~(b))

endfunction