monoids-in-the-category-of-endofunctors/src/Relation/Base.hs

module Relation.Base where

import Data.Kind (Type)

type Relation :: Type -> Type
type Relation k = k -> k -> Type

type Object :: Relation i -> i -> Type
type Object r x = r x x