Agda-2.3.2: A dependently typed functional programming language and proof assistant

Safe HaskellNone

Agda.TypeChecking.Records

Synopsis

Documentation

orderFields :: QName -> a -> [Name] -> [(Name, a)] -> TCM [a]Source

Order the fields of a record construction. Use the second argument for missing fields.

recordModule :: QName -> ModuleNameSource

The name of the module corresponding to a record.

getRecordDef :: QName -> TCM DefnSource

Get the definition for a record. Throws an exception if the name does not refer to a record.

getRecordFieldNames :: QName -> TCM [Arg Name]Source

Get the field names of a record.

findPossibleRecords :: [Name] -> TCM [QName]Source

Find all records with at least the given fields.

getRecordFieldTypes :: QName -> TCM TelescopeSource

Get the field types of a record.

getRecordTypeFields :: Type -> TCM [Arg QName]Source

Get the field names belonging to a record type.

getRecordConstructorType :: QName -> TCM TypeSource

Get the type of the record constructor.

getRecordConstructor :: QName -> TCM QNameSource

Returns the given record type's constructor name (with an empty range).

isRecord :: QName -> TCM (Maybe Defn)Source

Check if a name refers to a record. If yes, return record definition.

isEtaRecord :: QName -> TCM BoolSource

Check if a name refers to an eta expandable record.

isInductiveRecord :: QName -> TCM BoolSource

Check if a name refers to a record which is not coinductive. (Projections are then size-preserving)

isEtaRecordType :: Type -> TCM (Maybe (QName, Args))Source

Check if a type is an eta expandable record and return the record identifier and the parameters.

isRecordConstructor :: QName -> TCM (Maybe (QName, Defn))Source

Check if a name refers to a record constructor. If yes, return record definition.

isGeneratedRecordConstructor :: QName -> TCM BoolSource

Check if a constructor name is the internally generated record constructor.

unguardedRecord :: QName -> TCM ()Source

Mark record type as unguarded. No eta-expansion. Projections do not preserve guardedness.

recursiveRecord :: QName -> TCM ()Source

Mark record type as recursive. Projections do not preserve guardedness.

etaExpandRecord :: QName -> Args -> Term -> TCM (Telescope, Args)Source

Compute the eta expansion of a record. The first argument should be the name of a record type. Given

record R : Set where x : A; y : B; .z : C

and r : R, etaExpand R [] r is [R.x r, R.y r, DontCare]

etaContractRecord :: QName -> QName -> Args -> TCM TermSource

The fields should be eta contracted already.

We can eta constract if all fields f = ... are irrelevant or the corresponding projection f = f v of the same value v, but we need at least one relevant field to find the value v.

isSingletonRecord :: QName -> Args -> TCM (Either MetaId Bool)Source

Is the type a hereditarily singleton record type? May return a blocking metavariable.

Precondition: The name should refer to a record type, and the arguments should be the parameters to the type.

isSingletonRecord' :: Bool -> QName -> Args -> TCM (Either MetaId (Maybe Term))Source

Return the unique (closed) inhabitant if exists. In case of counting irrelevance in, the returned inhabitant contains garbage.

isSingletonType :: Type -> TCM (Either MetaId (Maybe Term))Source

Check whether a type has a unique inhabitant and return it. Can be blocked by a metavar.

isSingletonTypeModuloRelevance :: MonadTCM tcm => Type -> tcm (Either MetaId Bool)Source

Check whether a type has a unique inhabitant (irrelevant parts ignored). Can be blocked by a metavar.

emap :: (a -> b) -> Either c (Maybe a) -> Either c (Maybe b)Source

Auxiliary function.