diff options
Diffstat (limited to 'src/Core/Thinning.idr')
| -rw-r--r-- | src/Core/Thinning.idr | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Core/Thinning.idr b/src/Core/Thinning.idr index 5781eaa..de0d5dc 100644 --- a/src/Core/Thinning.idr +++ b/src/Core/Thinning.idr @@ -49,6 +49,8 @@ data View : sx `Thins` sy -> Type where (0 prf : IsNotId thin) -> -- For uniqueness View (keep thin n) +%name View view + export view : (thin : sx `Thins` sy) -> View thin view IsId = Id sx |