summaryrefslogtreecommitdiff
path: root/macros/FunctionAnnotation/FA_SZ_DEC2OCT.sci
blob: bf9df19f3f7b89fe885f3200282f56e9693f6fd6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
function opout = FA_SZ_DEC2OCT(inval)

// 07-Sep-2016 -- Author : Shamik Guha

inval=string(inval);
if (isnum(inval)) then
    in_num = eval(inval) ;
    out=dec2oct(in_num);
    //disp(out);

else
    error(36, 'Wrong input argument '+inval+'.');

end

out=eval(out);

opout=string(floor(log10(abs(out)+1))+1);
out=string(out);
endfunction