Language.KURE.BiTransform

A bi-directional transformation is a transformation that can be applied in either direction.

Bi-directional Transformations

data BiTransform c m a b

An undirected Transform.

Instances

Monad m => Category * (BiTransform c m)

type BiTranslate c m a b = BiTransform c m a b

A deprecated synonym for BiTranslate.

type BiRewrite c m a = BiTransform c m a a

A BiTransform that shares the same source and target type.

bidirectional :: Transform c m a b -> Transform c m b a -> BiTransform c m a b

Construct a BiTransform from two opposite Transforms.

forwardT :: BiTransform c m a b -> Transform c m a b

Extract the forward Transform from a BiTransform.

backwardT :: BiTransform c m a b -> Transform c m b a

Extract the backward Transform from a BiTransform.

whicheverR :: MonadCatch m => BiRewrite c m a -> Rewrite c m a

Try the BiRewrite forwards, then backwards if that fails. Useful when you know which rule you want to apply, but not which direction to apply it in.

invertBiT :: BiTransform c m a b -> BiTransform c m b a

Invert the forwards and backwards directions of a BiTransform.

beforeBiR :: Monad m => Transform c m a b -> (b -> BiRewrite c m a) -> BiRewrite c m a

Perform the argument transformation before either direction of the bidirectional rewrite.

afterBiR :: Monad m => BiRewrite c m a -> Rewrite c m a -> BiRewrite c m a

Apply the argument rewrite to the result of either direction of the bidirectional rewrite.

Bi-directional Injections

extractBiT :: (Monad m, Injection a u, Injection b u) => BiTransform c m u u -> BiTransform c m a b

Convert a bidirectional transformation over an injected value into a bidirectional transformation over non-injected values, (failing if an injected value cannot be projected).

promoteBiT :: (Monad m, Injection a u, Injection b u) => BiTransform c m a b -> BiTransform c m u u

Promote a bidirectional transformation from value to value into a transformation over an injection of those values, (failing if an injected value cannot be projected).

extractBiR :: (Monad m, Injection a u) => BiRewrite c m u -> BiRewrite c m a

Convert a bidirectional rewrite over an injected value into a bidirectional rewrite over a projection of that value, (failing if an injected value cannot be projected).

promoteBiR :: (Monad m, Injection a u) => BiRewrite c m a -> BiRewrite c m u

Promote a bidirectional rewrite over a value into a bidirectional rewrite over an injection of that value, (failing if an injected value cannot be projected).

extractWithFailMsgBiT :: (Monad m, Injection a u, Injection b u) => String -> BiTransform c m u u -> BiTransform c m a b

As extractBiT, but takes a custom error message to use if extraction fails.

promoteWithFailMsgBiT :: (Monad m, Injection a u, Injection b u) => String -> BiTransform c m a b -> BiTransform c m u u

As promoteBiT, but takes a custom error message to use if promotion fails.

extractWithFailMsgBiR :: (Monad m, Injection a u) => String -> BiRewrite c m u -> BiRewrite c m a

As extractBiR, but takes a custom error message to use if extraction fails.

promoteWithFailMsgBiR :: (Monad m, Injection a u) => String -> BiRewrite c m a -> BiRewrite c m u

As promoteBiR, but takes a custom error message to use if promotion fails.