|
definition: |
preCondExpOf :: QName -> [(Int,TypeExpr)] -> TransStateM SMT.Term
preCondExpOf qf args = do
preconds <- lift $ gets $ preConds . trInfo
maybe (return true)
(\fd -> applyFunc fd args >>= pred2SMT)
(find (\fd -> decodeContractQName (funcName fd)
== toPreCondQName (fromNoCheckQName qf)) preconds)
|
|
demand: |
no demanded arguments |
|
deterministic: |
deterministic operation |
|
documentation: |
------------------------------------------------------------------------ Returns the precondition expression for a given operation and its arguments (which are assumed to be variable indices). Rename all local variables by adding the `freshvar` index to them. |
|
failfree: |
<FAILING> |
|
indeterministic: |
referentially transparent operation |
|
infix: |
no fixity defined |
|
iotype: |
{(_,_) |-> _}
|
|
name: |
preCondExpOf |
|
precedence: |
no precedence defined |
|
result-values: |
_ |
|
signature: |
(String, String) -> [(Prelude.Int, FlatCurry.Types.TypeExpr)] -> Control.Monad.Trans.State.StateT TransState.TransState (Control.Monad.Trans.State.StateT VerifierState.VState Prelude.IO) Language.SMTLIB.Types.Term |
|
solution-complete: |
operation might suspend on free variables |
|
terminating: |
possibly non-terminating |
|
totally-defined: |
possibly non-reducible on same data term |