diff options
Diffstat (limited to '2.3-1/macros/FunctionAnnotation/FA_SZ_PRIMES.sci')
| -rw-r--r-- | 2.3-1/macros/FunctionAnnotation/FA_SZ_PRIMES.sci | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/2.3-1/macros/FunctionAnnotation/FA_SZ_PRIMES.sci b/2.3-1/macros/FunctionAnnotation/FA_SZ_PRIMES.sci new file mode 100644 index 00000000..5a450686 --- /dev/null +++ b/2.3-1/macros/FunctionAnnotation/FA_SZ_PRIMES.sci @@ -0,0 +1,21 @@ +function opout = FA_SZ_PRIMES(inval) + +// 17-Dec-2016 -- Author : Shamik Guha + +inval=string(inval); +if (isnum(inval)) then + in_num = eval(inval) ; + out=primes(in_num); + //disp(out); + +else + error(36, "Wrong input argument "+inval+"."); + +end + + +out=(length(out)); +opout=string(out); +//disp(opout); + +endfunction |