UNPKG
algebrite
Version:
latest (1.4.0)
1.4.0
1.3.1
1.3.0
1.2.1
1.2.0
1.1.2
1.1.1
1.0.2
1.0.1
1.0.0
0.4.5
0.4.4
0.4.3
0.4.2
0.4.1
0.4.0
0.3.2
0.2.23
0.2.22
0.2.21
0.2.20
0.2.15
0.2.14
0.2.13
0.2.12
0.2.11
0.2.9
0.2.8
0.2.7
0.2.6
0.2.5
0.2.4
0.2.3
0.2.2
0.2.1
0.2.0
0.1.0
Computer Algebra System in Coffeescript
github.com/davidedc/Algebrite
davidedc/Algebrite
algebrite
/
sources
/
isprime.coffee
12 lines
(8 loc)
•
148 B
text/coffeescript
View Raw
1
2
3
4
5
6
7
8
9
10
11
12
Eval_isprime = ->
push
(cadr(p1)) Eval() p1 =
pop
()
if
(isnonnegativeinteger(p1) && mprime(p1.q.a)) push_integer(
1
)
else
push_integer(
0
)