Safe Haskell | Safe-Inferred |
---|

- module DDC.Type.Compounds
- takeAnnotOfExp :: Exp a n -> Maybe a
- xLAMs :: a -> [Bind n] -> Exp a n -> Exp a n
- xLams :: a -> [Bind n] -> Exp a n -> Exp a n
- makeXLamFlags :: a -> [(Bool, Bind n)] -> Exp a n -> Exp a n
- takeXLAMs :: Exp a n -> Maybe ([Bind n], Exp a n)
- takeXLams :: Exp a n -> Maybe ([Bind n], Exp a n)
- takeXLamFlags :: Exp a n -> Maybe ([(Bool, Bind n)], Exp a n)
- xApps :: a -> Exp a n -> [Exp a n] -> Exp a n
- makeXAppsWithAnnots :: Exp a n -> [(Exp a n, a)] -> Exp a n
- takeXApps :: Exp a n -> Maybe (Exp a n, [Exp a n])
- takeXApps1 :: Exp a n -> Exp a n -> (Exp a n, [Exp a n])
- takeXAppsAsList :: Exp a n -> [Exp a n]
- takeXAppsWithAnnots :: Exp a n -> (Exp a n, [(Exp a n, a)])
- takeXConApps :: Exp a n -> Maybe (DaCon n, [Exp a n])
- takeXPrimApps :: Exp a n -> Maybe (n, [Exp a n])
- dcUnit :: DaCon n
- takeNameOfDaCon :: DaCon n -> Maybe n
- takeTypeOfDaCon :: DaCon n -> Maybe (Type n)
- bindsOfPat :: Pat n -> [Bind n]
- wApp :: a -> Witness a n -> Witness a n -> Witness a n
- wApps :: a -> Witness a n -> [Witness a n] -> Witness a n
- takeXWitness :: Exp a n -> Maybe (Witness a n)
- takeWAppsAsList :: Witness a n -> [Witness a n]
- takePrimWiConApps :: Witness a n -> Maybe (n, [Witness a n])

# Documentation

module DDC.Type.Compounds

takeAnnotOfExp :: Exp a n -> Maybe aSource

# Lambdas

makeXLamFlags :: a -> [(Bool, Bind n)] -> Exp a n -> Exp a nSource

Make some nested lambda abstractions, using a flag to indicate whether the lambda is a level-1 (True), or level-0 (False) binder.

takeXLAMs :: Exp a n -> Maybe ([Bind n], Exp a n)Source

Split type lambdas from the front of an expression,
or `Nothing`

if there aren't any.

takeXLams :: Exp a n -> Maybe ([Bind n], Exp a n)Source

Split nested value or witness lambdas from the front of an expression,
or `Nothing`

if there aren't any.

takeXLamFlags :: Exp a n -> Maybe ([(Bool, Bind n)], Exp a n)Source

Split nested lambdas from the front of an expression, with a flag indicating whether the lambda was a level-1 (True), or level-0 (False) binder.

# Applications

makeXAppsWithAnnots :: Exp a n -> [(Exp a n, a)] -> Exp a nSource

takeXApps :: Exp a n -> Maybe (Exp a n, [Exp a n])Source

Flatten an application into the function part and its arguments.

Returns `Nothing`

if there is no outer application.

takeXApps1 :: Exp a n -> Exp a n -> (Exp a n, [Exp a n])Source

Flatten an application into the function part and its arguments.

This is like `takeXApps`

above, except we know there is at least one argument.

takeXAppsAsList :: Exp a n -> [Exp a n]Source

Flatten an application into the function parts and arguments, if any.

takeXAppsWithAnnots :: Exp a n -> (Exp a n, [(Exp a n, a)])Source

Destruct sequence of applications.
Similar to `takeXAppsAsList`

but also keeps annotations for later.

takeXConApps :: Exp a n -> Maybe (DaCon n, [Exp a n])Source

Flatten an application of a data constructor into the constructor and its arguments.

Returns `Nothing`

if the expression isn't a constructor application.

takeXPrimApps :: Exp a n -> Maybe (n, [Exp a n])Source

Flatten an application of a primop into the variable and its arguments.

Returns `Nothing`

if the expression isn't a primop application.

# Data Constructors

takeNameOfDaCon :: DaCon n -> Maybe n

Take the name of data constructor, if there is one.

takeTypeOfDaCon :: DaCon n -> Maybe (Type n)

Take the type annotation of a data constructor, if we know it locally.

# Patterns

bindsOfPat :: Pat n -> [Bind n]

Take the binds of a `Pat`

.

# Witnesses

wApps :: a -> Witness a n -> [Witness a n] -> Witness a n

Construct a sequence of witness applications

takeXWitness :: Exp a n -> Maybe (Witness a n)

Take the witness from an `XWitness`

argument, if any.

takeWAppsAsList :: Witness a n -> [Witness a n]

Flatten an application into the function parts and arguments, if any.

takePrimWiConApps :: Witness a n -> Maybe (n, [Witness a n])

Flatten an application of a witness into the witness constructor name and its arguments.

Returns nothing if there is no witness constructor in head position.