lumin/my-solutions
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

codewars: solve 'sum of positive' challenge

Browse source
This commit is contained in:
Ivan R. 2024-02-20 00:49:54 +05:00
parent 9951704e30
commit 87d77ce5b2
No known key found for this signature in database
GPG key ID: 56C7BAAE859B302C
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
codewars/ocaml/sum-of-positive/main.ml Normal file
View file

@ -0,0 +1,2 @@
let positive_sum ls =
List.fold_left ( + ) 0 (List.filter (fun x -> x > 0) ls);;