Commit 4f8a19f6 authored by Nicola Botta's avatar Nicola Botta
Browse files

Initial.

parent e59779e5
> module Decidable.Predicates
> %default total
> %access public export
> Dec0 : Type -> Type
> Dec0 = Dec
> Dec1 : {A : Type} -> (P : A -> Type) -> Type
> Dec1 {A} P = (a : A) -> Dec0 (P a)
> DecEq0 : Type -> Type
> DecEq0 A = (a1 : A) -> (a2 : A) -> Dec (a1 = a2)
> DecEq1 : {A : Type} -> (P : A -> Type) -> Type
> DecEq1 {A} P = (a : A) -> DecEq0 (P a)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment