pub const decode: fn(value.Value(c, d)) -> Result(
  request.Request(BitArray),
  break.Reason(c, d),
)

pub fn encode(
  result: Result(response.Response(BitArray), String),
) -> value.Value(a, b)

pub const label: String

pub fn lift() -> isomorphic.Type(Int)

pub fn lower() -> isomorphic.Type(Int)