Files
webgems/utils/pure.js
Kevin Van Der Werff 6bca23dca5 🎨 adjust pure.js
2019-10-21 21:16:32 +02:00

51 lines
1.4 KiB
JavaScript

/*eslint-disable */
import * as R from 'ramda'
/// Types
const Resource = {
title: String,
cleanTitle: String,
desc: String,
path: String,
url: String,
tags: [String],
}
const Category = {
title: String,
slug: String,
resources: [Resource],
}
/// Functions
// isNotEmpty [a] -> Bool
export const isNotEmpty = R.compose(R.not, R.isEmpty)
// getAllResources :: [Category] -> [Resource]
export const getAllResources = R.compose(R.flatten, R.map(R.prop('resources')))
// tagsNotEmpty :: Resource -> Bool
export const tagsNotEmpty = R.compose(isNotEmpty, R.prop('tags'))
// cleanString :: String -> String
export const cleanString = R.compose(R.toLower, R.trim)
// true if list2 has element that appears in list1 else false
// includesElOf([1, 2])([2]) -> true
// includesElOf([1, 2], [3]) -> false
// includesElOf(['a', 'b'], ['a']) -> true
// includesElOf(['aa', 'b'], ['a']) -> false
// includesElOf :: [a] -> [a] -> Bool
export const includesElOf = R.curry((list1, list2) => R.any(el => R.includes(el, list2), list1))
// Similar to includesElOf, but partially included strings are also allowed
// partiallyIncludesElOf(['a', 'b'])(['a']) -> true
// partiallyIncludesElOf(['aa', 'b'], ['a']) -> true
// partiallyIncludesElOf(['aa', 'b'], ['c']) -> false
// partiallyIncludesElOf :: [String] -> [String] -> Bool
export const partiallyIncludesElOf = R.curry((list1, list2) =>
R.any(el2 =>
R.any(R.includes(el2), list1),
list2)
)