Haskerl for e1 and running instructions
This commit is contained in:
parent
3d62d1bdf7
commit
97b86f1d3f
|
@ -0,0 +1,6 @@
|
||||||
|
divisors_3_5 [] acc = acc
|
||||||
|
divisors_3_5 (x:xs) acc
|
||||||
|
| rem x 3 == 0 || rem x 5 == 0 = divisors_3_5 xs (x:acc)
|
||||||
|
| otherwise = divisors_3_5 xs acc
|
||||||
|
|
||||||
|
e1 = sum (divisors_3_5 [1 .. 999] [])
|
|
@ -0,0 +1,3 @@
|
||||||
|
erl
|
||||||
|
c(filename)
|
||||||
|
module:function
|
|
@ -0,0 +1,3 @@
|
||||||
|
hugs
|
||||||
|
:load file
|
||||||
|
fn
|
Loading…
Reference in New Issue