UniqueLogic.ST.TF.Expression

Documentation

data T w s a

An expression is defined by a set of equations and the variable at the top-level. The value of the expression equals the value of the top variable.

Instances

(C w, Value w a, Fractional a) => Fractional (T w s a)

(C w, Value w a, Fractional a) => Num (T w s a)

Construct primitive expressions

constant :: (C w, Value w a) => a -> T w s a

Make a constant expression of a simple numeric value.

fromVariable :: Variable w s a -> T w s a

Operators from rules with small numbers of arguments

fromRule1 :: (C w, Value w a) => (Variable w s a -> T w s ()) -> T w s a

fromRule2 :: (C w, Value w b) => (Variable w s a -> Variable w s b -> T w s ()) -> T w s a -> T w s b

fromRule3 :: (C w, Value w c) => (Variable w s a -> Variable w s b -> Variable w s c -> T w s ()) -> T w s a -> T w s b -> T w s c

Operators from rules with any number of arguments

data Apply w s f

Instances

Functor (Apply w s)

Applicative (Apply w s)

arg :: T w s a -> Apply w s (Variable w s a)

This function allows to generalize fromRule2 and fromRule3 to more arguments using Applicative combinators.

Example:

 fromRule3 rule x y
    = runApply $ liftA2 rule (arg x) (arg y)
    = runApply $ pure rule <*> arg x <*> arg y

Building rules with arg provides more granularity than using auxiliary pair rules!

runApply :: (C w, Value w a) => Apply w s (Variable w s a -> T w s ()) -> T w s a

Predicates on expressions

(=:=) :: C w => T w s a -> T w s a -> T w s ()

Common operators (see also Num and Fractional instances)

(=!=) :: C w => T w s a -> T w s a -> T w s a

sqr :: (C w, Value w a, Floating a) => T w s a -> T w s a

sqrt :: (C w, Value w a, Floating a) => T w s a -> T w s a

max :: (C w, Ord a, Value w a) => T w s a -> T w s a -> T w s a

We are not able to implement a full Ord instance including Eq superclass and comparisons, but we need to compute maxima.

maximum :: (C w, Ord a, Value w a) => [T w s a] -> T w s a

pair :: (C w, Value w a, Value w b, Value w (a, b)) => T w s a -> T w s b -> T w s (a, b)

Construct or decompose a pair.