import {liftEquivalences} from 'effect-ts-laws'
import {Number as NU, Option as OP, String as STR} from 'effect'
import {OptionTypeLambda} from 'effect/Option'
export const [eqOptionNumber, eqOptionString] =
liftEquivalences<OptionTypeLambda>(OP.getEquivalence)(
NU.Equivalence,
STR.Equivalence,
)
// eqOptionNumber ≡ Equivalence<Option<number>>
// eqOptionString ≡ Equivalence<Option<string>>
assert.ok(eqOptionNumber(OP.some(1), OP.some(1)))
assert.equal(eqOptionNumber(OP.some(1), OP.some(2)), false)
assert.ok(eqOptionString(OP.some('a'), OP.some('a')))
assert.equal(eqOptionString(OP.some('a'), OP.some('b')), false)
Given a LiftEquivalence function, and 1..n
Equivalence
s for different typesA₁, A₂, ...Aₙ
, returns the given list except every equivalence for typeAᵢ
has been replaced by an equivalence for typeKind<F, R, O, E, Aᵢ>
. For example: