summaryrefslogtreecommitdiff
path: root/macros/FunctionAnnotation/FA_SZ_FACTOR.sci
diff options
context:
space:
mode:
authorSandeep Gupta2017-06-18 23:55:40 +0530
committerSandeep Gupta2017-06-18 23:55:40 +0530
commit277d1edfa17bf3719d90ddbac8e31f6181e952c3 (patch)
tree0661f1f52af0a0fd654edd4984c30e57037303c6 /macros/FunctionAnnotation/FA_SZ_FACTOR.sci
downloadscilab2c-277d1edfa17bf3719d90ddbac8e31f6181e952c3.tar.gz
scilab2c-277d1edfa17bf3719d90ddbac8e31f6181e952c3.tar.bz2
scilab2c-277d1edfa17bf3719d90ddbac8e31f6181e952c3.zip
First commit
Diffstat (limited to 'macros/FunctionAnnotation/FA_SZ_FACTOR.sci')
-rw-r--r--macros/FunctionAnnotation/FA_SZ_FACTOR.sci20
1 files changed, 20 insertions, 0 deletions
diff --git a/macros/FunctionAnnotation/FA_SZ_FACTOR.sci b/macros/FunctionAnnotation/FA_SZ_FACTOR.sci
new file mode 100644
index 00000000..d816ff75
--- /dev/null
+++ b/macros/FunctionAnnotation/FA_SZ_FACTOR.sci
@@ -0,0 +1,20 @@
+function opout = FA_SZ_FACTOR(inval)
+
+// 17-Dec-2016 -- Author : Shamik Guha
+
+inval=string(inval);
+if (isnum(inval)) then
+ in_num = eval(inval) ;
+ out=factor(in_num);
+ //disp(out);
+
+else
+ error(36, "Wrong input argument "+inval+".");
+
+end
+
+
+out=(length(out));
+opout=string(out);
+
+endfunction