diff options
Diffstat (limited to 'macros/FunctionAnnotation/FA_SZ_DEC 2OCT.sci~')
-rw-r--r-- | macros/FunctionAnnotation/FA_SZ_DEC 2OCT.sci~ | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/macros/FunctionAnnotation/FA_SZ_DEC 2OCT.sci~ b/macros/FunctionAnnotation/FA_SZ_DEC 2OCT.sci~ deleted file mode 100644 index 340dd2a5..00000000 --- a/macros/FunctionAnnotation/FA_SZ_DEC 2OCT.sci~ +++ /dev/null @@ -1,30 +0,0 @@ -function opout1 = FA_SZ_DEC2OCT(inval1) - -// 07-Sep-2016 -- Author : Shamik Guha - - -// ------------------------------ -// --- Check input arguments. --- -// ------------------------------ -//SCI2CNInArgCheck(argn(2),2,2); -//insize=string(insize); - -inval1=string(inval1); -disp(inval1); - -if (isnum(inval1)) then - in_num1 = eval(inval1) ; - out1=dec2oct(in_num1); - disp(out1); - -else - error(36, "Wrong input argument '+inval1+'."); - -end - -out1=eval(out1); - -opout1=string(floor(log10(abs(out1)+1))+1); -out1=string(out1); -disp(opout1); -endfunction |