bnenu

import { contains, propEq, filter, flip, propSatisfies, isEmpty, compose, head, not } from 'ramda'
import { isFunction, isArray } from 'crocks'

// Query = Function | Array
// Set = [a]

// defineSet :: Query -> a -> Set
export const defineSet = q => x =>
  (isFunction(q) && q(x)) || (isArray(q) && contains(x)(q)) ? [ x ] : []