Agda- A dependently typed functional programming language and proof assistant

Safe HaskellNone



Coverage checking, case splitting, and splitting for refine tactics.



data SplitClause Source #




  • scTel :: Telescope

    Type of variables in scPats.

  • scPats :: [NamedArg DeBruijnPattern]

    The patterns leading to the currently considered branch of the split tree.

  • scSubst :: PatternSubstitution

    Substitution from scTel to old context. Only needed directly after split on variable: * To update scTarget * To rename other split variables when splitting on multiple variables. scSubst is not `transitive', i.e., does not record the substitution from the original context to scTel over a series of splits. It is freshly computed after each split by computeNeighborhood; also splitResult, which does not split on a variable, should reset it to the identity idS, lest it be applied to scTarget again, leading to Issue 1294.

  • scTarget :: Maybe (Arg Type)

    The type of the rhs, living in context scTel. This invariant is broken before calls to fixTarget; there, scTarget lives in the old context. fixTarget moves scTarget to the new context by applying substitution scSubst.


PrettyTCM SplitClause Source #

For debugging only.

clauseToSplitClause :: Clause -> SplitClause Source #

Create a split clause from a clause in internal syntax.

fixTarget :: SplitClause -> TCM (Telescope, SplitClause) Source #

Update the target type, add more patterns to split clause if target becomes a function type. Returns the domains of the function type (if any).

data Covering Source #

A Covering is the result of splitting a SplitClause.




splitClauses :: Covering -> [SplitClause] Source #

Project the split clauses out of a covering.

coverageCheck :: QName -> Type -> [Clause] -> TCM SplitTree Source #

Top-level function for checking pattern coverage.

splitClauseWithAbsurd :: SplitClause -> Nat -> TCM (Either SplitError (Either SplitClause Covering)) Source #

Entry point from Interaction.MakeCase.

splitLast :: Induction -> Telescope -> [NamedArg DeBruijnPattern] -> TCM (Either SplitError Covering) Source #

Entry point from TypeChecking.Empty and Interaction.BasicOps. splitLast CoInductive is used in the refine tactics.

splitResult :: QName -> SplitClause -> TCM (Maybe Covering) Source #

splitResult f sc = return res

If the target type of sc is a record type, a covering set of split clauses is returned (sc extended by all valid projection patterns), otherwise res == Nothing. Note that the empty set of split clauses is returned if the record has no fields.