| definition: |
checkEqualsTrue :: Expression a -> Int -> CSM ()
checkEqualsTrue e _ =
case e of
(InfixApply
_
_
(InfixOp _
(QualIdent _ _
(Ident _ _ _)))
_)
-> checkInfixEqualsTrue e
(Apply _
(Apply _
(Variable _ _
(QualIdent _ _
(Ident _ _ _)
)
)
_)
_)
-> checkApplyEqualsTrue e
_ -> return ()
|
| demand: |
argument 1 |
| deterministic: |
deterministic operation |
| documentation: |
-- Calls actual checks on correct patterns: -- 1. a == b -- 2. (==) a b |
| failfree: |
<FAILING> |
| indeterministic: |
referentially transparent operation |
| infix: |
no fixity defined |
| iotype: |
{({InfixApply},_) |-> _ || ({Apply},_) |-> _ || ({Literal},_) |-> _ || ({Variable},_) |-> _ || ({Constructor},_) |-> _ || ({Paren},_) |-> _ || ({Typed},_) |-> _ || ({Record},_) |-> _ || ({RecordUpdate},_) |-> _ || ({Tuple},_) |-> _ || ({List},_) |-> _ || ({ListCompr},_) |-> _ || ({EnumFrom},_) |-> _ || ({EnumFromThen},_) |-> _ || ({EnumFromTo},_) |-> _ || ({EnumFromThenTo},_) |-> _ || ({UnaryMinus},_) |-> _ || ({LeftSection},_) |-> _ || ({RightSection},_) |-> _ || ({Lambda},_) |-> _ || ({Let},_) |-> _ || ({Do},_) |-> _ || ({IfThenElse},_) |-> _ || ({Case},_) |-> _}
|
| name: |
checkEqualsTrue |
| precedence: |
no precedence defined |
| result-values: |
_ |
| signature: |
Curry.Types.Expression a -> Prelude.Int -> Control.Monad.Trans.State.StateT Types.CheckState Data.Functor.Identity.Identity () |
| solution-complete: |
operation might suspend on free variables |
| terminating: |
possibly non-terminating |
| totally-defined: |
possibly non-reducible on same data term |