blob: 99eb5b1c88058c221208d176f0c3146d0ed4b616 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
function deviation()
a=[ 211.128 2912 4.12 123 ; 53211 12.312 21 0]
disp('Double')
disp(mad(a, 'r'))
disp('')
disp(mad(a, 'c'))
disp('')
disp(mad(a))
disp('')
disp('Float')
b= float(a)
disp(mad(b, 'r'))
disp('')
disp(mad(b, 'c'))
disp('')
disp(mad(b))
disp('')
disp('DoubleComplex')
c= [%i*971+ 231, 87+%i*16, 2400+%i*1721; 981,0, %i*1213]
disp(mad(c, 'r'))
disp('')
disp(mad(c, 'c'))
disp('')
disp(mad(c))
disp('')
endfunction
|