macros/FunctionAnnotation/FA_SCHUR_SZ.sci


1
2
3
4
5
6
7
8
9
10
11
12
13

function out2sz = FA_SCHUR_SZ(in2tp,in1sz)

in2type = string(in2tp);
in1sz = string(in1sz);
in1dim = eval(in1sz);

if(in2type == 'g')
	out2sz = '1'
else
	out2sz = string(in1dim)
end

endfunction