Anonymous user
Semiprime: Difference between revisions
m
→{{header|Maple}}: Update to use newer Maple package and fix typo
m (used a larger font to show the equation.) |
m (→{{header|Maple}}: Update to use newer Maple package and fix typo) |
||
Line 763:
<lang Maple>SemiPrimes := proc( n )
local fact;
fact :=
if numelems( fact ) in {1,2} and not( member( 'false', isprime ~ ( fact ) ) ) then
return n;
Line 770:
end if;
end proc:
{ seq(
Output:
<lang Maple>
|