diff options
| author | Greg Brown <greg.brown01@ed.ac.uk> | 2023-07-11 16:25:24 +0100 |
|---|---|---|
| committer | Greg Brown <greg.brown01@ed.ac.uk> | 2023-07-11 16:25:24 +0100 |
| commit | 60df32ffd5b88498e4634649509bbd0810421004 (patch) | |
| tree | 646cf040522eb217ff3188e4b9b68b170e539f0b /src/Data/Term.idr | |
| parent | 60d5896ab7939ae42cf7744f93e8eaefa0675854 (diff) | |
Begin big unification proof.
Diffstat (limited to 'src/Data/Term.idr')
| -rw-r--r-- | src/Data/Term.idr | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Data/Term.idr b/src/Data/Term.idr index 4b0ac3e..ebb7b00 100644 --- a/src/Data/Term.idr +++ b/src/Data/Term.idr @@ -30,6 +30,9 @@ export varIsVar : (x : SFin (S n)) -> Var' x = Var x varIsVar x = Refl +export +Uninhabited (Op op ts = Var x) where uninhabited prf impossible + -- Substitution ---------------------------------------------------------------- export |