1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
// Test file for "nthroot" function for the data types double, float, double complex.
function nthroot1()
b= [1,2,3,4;5,6,7,8]
c=[45,12,4,12; 23,34,5,6]
d= nthroot(b,c)
disp(d)
disp('')
e=34
f= nthroot(b,e)
disp(f)
disp('')
k=nthroot(3.2123,12)
disp(k)
disp('')
m= float(b)
l= float(c)
disp(nthroot(m,l))
endfunction
|