blob: 5a45068615aa07a5121f1733a900bea27cd8f237 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
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
|