Array: Difference between revisions
Content added Content deleted
Puppydrum64 (talk | contribs) |
(added ReScript) |
||
Line 257: | Line 257: | ||
reduce range(2;n+1) as $i (1; . * $i) # => n!</lang> |
reduce range(2;n+1) as $i (1; . * $i) # => n!</lang> |
||
===[[ReScript]]=== |
|||
<lang ReScript>let arr1 = [4, 2, 8, 14, 3, 6, 22, 17] |
|||
let _ = Js.Array2.push(arr1, 5) |
|||
arr1[3] = 9 |
|||
let isEven = x => mod(x, 2) == 0 |
|||
let square = x => x * x |
|||
let arr2 = Js.Array2.filter(arr1, isEven) |
|||
let arr3 = Js.Array2.map(arr2, square) |
|||
let total = Js.Array2.reduce(arr3, \"+", 0) |
|||
Js.log2("total: ", Js.Int.toString(total)) |
|||
let arr4 = Js.Array2.sortInPlaceWith(arr3, (a, b) => a - b) |
|||
let arr5 = Js.Array2.slice(arr4, ~start=2, ~end_=4) |
|||
Js.Array2.forEach(arr5, x => Js.log(x)) |
|||
switch Js.Array2.find(arr1, x => x < 0) { |
|||
| Some(x) => Js.log2("found: ", x) |
|||
| None => Js.log("no negative element found") |
|||
}</lang> |
|||
{{out}} |
|||
<pre>$ bsc arr.res > arr.js |
|||
$ node arr.js |
|||
total: 604 |
|||
36 |
|||
64 |
|||
no negative element found |
|||
</pre> |
|||
===[[REXX]]=== |
===[[REXX]]=== |