Skip to content

preferThis/preferThat #170

@sullyj3

Description

@sullyj3
preferThis :: These a a -> a
preferThis = mergeThese const

preferThat :: These a a -> a
preferThat = mergeThese $ flip const

These functions come in handy as arguments to alignWith in cases where you want to prioritize one side or the other. Would a PR for this be welcome?

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type
    No fields configured for issues without a type.

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions