blob: 687a89e4fe7e775e4e52f76ad663d2e5002402bb (
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
|
function outsize = FA_SZ_ROW_DIAG(insize)
// function outsize = FA_SZ_1(insize)
// -----------------------------------------------------------------
// Returns the first element of the size array.
//
// Input data:
// insize: size of input argument. It is an array of 2 strings.
// The first string specifies the number of rows.
// The second string specifies the number of columns.
//
// Output data:
// outsize: first element of the insize array.
//
// Status:
// 08-Dec-2007 -- Raffaele Nutricato: Author.
// 08-Dec-2007 -- Alberto Morea: Test Ok.
// -----------------------------------------------------------------
if(insize(1)=='1') then
outsize = insize(2);
elseif(insize(1) == insize(2))
outsize = insize(1);
else
outsize = insize(1);
end
endfunction
|