Add linear array module
This commit is contained in:
parent
13d5f7aa21
commit
a244acc7f1
3 changed files with 161 additions and 0 deletions
|
|
@ -46,6 +46,11 @@ data Array : (s : Vect rk Nat) -> (a : Type) -> Type where
|
|||
%name Array arr
|
||||
|
||||
|
||||
export
|
||||
unsafeMkArray : Order -> Vect rk Nat -> (s : Vect rk Nat) -> PrimArray a -> Array s a
|
||||
unsafeMkArray = MkArray
|
||||
|
||||
|
||||
--------------------------------------------------------------------------------
|
||||
-- Properties of arrays
|
||||
--------------------------------------------------------------------------------
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue