Ideas.Common.Strategy.Combinators

A collection of strategy combinators: all lifted to work on different data types

Documentation

(.*.) :: (IsStrategy f, IsStrategy g) => f a -> g a -> Strategy a infixr 5

Put two strategies in sequence (first do this, then do that)

(.|.) :: (IsStrategy f, IsStrategy g) => f a -> g a -> Strategy a infixr 3

Choose between the two strategies (either do this or do that)

(.%.) :: (IsStrategy f, IsStrategy g) => f a -> g a -> Strategy a infixr 2

Interleave two strategies

(.@.) :: (IsStrategy f, IsStrategy g) => f a -> g a -> Strategy a infixr 2

Alternate two strategies

(!~>) :: IsStrategy f => Rule a -> f a -> Strategy a infixr 5

Prefixing a basic rule to a strategy atomically

inits :: IsStrategy f => f a -> Strategy a

Initial prefixes (allows the strategy to stop succesfully at any time)

succeed :: Strategy a

The strategy that always succeeds (without doing anything)

fail :: Strategy a

The strategy that always fails

atomic :: IsStrategy f => f a -> Strategy a

Makes a strategy atomic (w.r.t. parallel composition)

sequence :: IsStrategy f => [f a] -> Strategy a

Puts a list of strategies into a sequence

choice :: IsStrategy f => [f a] -> Strategy a

Combines a list of alternative strategies

interleave :: IsStrategy f => [f a] -> Strategy a

Merges a list of strategies (in parallel)

noInterleaving :: IsStrategy f => f a -> Strategy a

interleaveId :: Id

permute :: IsStrategy f => [f a] -> Strategy a

Allows all permutations of the list

many :: IsStrategy f => f a -> Strategy a

Repeat a strategy zero or more times (non-greedy)

many1 :: IsStrategy f => f a -> Strategy a

Apply a certain strategy at least once (non-greedy)

replicate :: IsStrategy f => Int -> f a -> Strategy a

Apply a strategy a certain number of times

option :: IsStrategy f => f a -> Strategy a

Apply a certain strategy or do nothing (non-greedy)

check :: (a -> Bool) -> Strategy a

Checks whether a predicate holds for the current term. The check is considered to be a minor step.

not :: IsStrategy f => f a -> Strategy a

Check whether or not the argument strategy cannot be applied: the result strategy only succeeds if this is not the case (otherwise it fails).

repeat :: IsStrategy f => f a -> Strategy a

Repeat a strategy zero or more times (greedy version of many)

repeat1 :: IsStrategy f => f a -> Strategy a

Apply a certain strategy at least once (greedy version of many1)

try :: IsStrategy f => f a -> Strategy a

Apply a certain strategy if this is possible (greedy version of option)

(./.) :: (IsStrategy f, IsStrategy g) => f a -> g a -> Strategy a infixr 4

Choose between the two strategies, with a preference for steps from the left hand-side strategy.

(|>) :: (IsStrategy f, IsStrategy g) => f a -> g a -> Strategy a infixr 4

Left-biased choice: if the left-operand strategy can be applied, do so. Otherwise, try the right-operand strategy

while :: IsStrategy f => (a -> Bool) -> f a -> Strategy a

Repeat the strategy as long as the predicate holds

until :: IsStrategy f => (a -> Bool) -> f a -> Strategy a

Repeat the strategy until the predicate holds

exhaustive :: IsStrategy f => [f a] -> Strategy a

Apply the strategies from the list exhaustively (until this is no longer possible)

dynamic :: (IsId n, IsStrategy f, IsTerm a) => n -> (a -> f a) -> Strategy a

The structure of a dynamic strategy depends on the current term

type DependencyGraph node key = [(node, key, [key])]

dependencyGraph :: (IsStrategy f, Ord key) => DependencyGraph (f a) key -> Strategy a

Create a strategy from a dependency graph with strategies as nodes Does not check for cycles