Initial data commit

This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 72d218235f
commit f23f22d71c
199087 changed files with 3378941 additions and 0 deletions

View file

@ -0,0 +1,25 @@
(() => {
'use strict';
// even : Integral a => a -> Bool
const even = x => (x % 2) === 0;
// odd : Integral a => a -> Bool
const odd = x => !even(x);
// TEST ----------------------------------------
// range :: Int -> Int -> [Int]
const range = (m, n) =>
Array.from({
length: Math.floor(n - m) + 1
}, (_, i) => m + i);
// show :: a -> String
const show = JSON.stringify;
// xs :: [Int]
const xs = range(-6, 6);
return show([xs.filter(even), xs.filter(odd)]);
})();