2
//--------------------------------------------------
4
a=ex2c_1([1,2,3]+%i*[4,5,5]);
5
if norm(a-2*[1,2,3]-%i*[4,5,5]*3) > %eps then pause,end
8
if norm(a-2*[1,2,3]) > %eps then pause,end
10
// Complex matrix as complex array
12
a=ex2c_2([1,2,3]+%i*[4,5,5]);
13
if norm(a-2*[1,2,3]-%i*[4,5,5]*3) > %eps then pause,end
17
a=ex2f_1([1,2,3]+%i*[4,5,5]);
18
if norm(a-2*[1,2,3]-%i*[4,5,5]*3) > %eps then pause,end
21
if norm(a-2*[1,2,3]) > %eps then pause,end
23
// Complex matrix as complex array
25
a=ex2f_2([1,2,3]+%i*[4,5,5]);
26
if norm(a-2*[1,2,3]-%i*[4,5,5]*3) > %eps then pause,end