codewars: solve 2 problems in ocaml
This commit is contained in:
parent
615aa114f2
commit
9951704e30
2 changed files with 4 additions and 0 deletions
2
codewars/ocaml/function-1-hello-world/main.ml
Normal file
2
codewars/ocaml/function-1-hello-world/main.ml
Normal file
|
@ -0,0 +1,2 @@
|
||||||
|
(* TODO: Write a function `greet ()` that returns "hello world!" *)
|
||||||
|
let greet () = "hello world!";;
|
2
codewars/ocaml/wilson-prime/main.ml
Normal file
2
codewars/ocaml/wilson-prime/main.ml
Normal file
|
@ -0,0 +1,2 @@
|
||||||
|
let am_i_wilson_prime (n: int): bool =
|
||||||
|
if n == 5 || n == 13 || n == 563 then true else false;;
|
Loading…
Reference in a new issue