mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-25 12:42:02 +03:00
20 lines
386 B
Idris
20 lines
386 B
Idris
|
import Data.Vect
|
||
|
|
|
||
|
|
using (Show a, Eq a)
|
||
|
|
foo : a -> String
|
||
|
|
foo x = show x ++ show x
|
||
|
|
|
||
|
|
bar : Int -> Int
|
||
|
|
bar x = x + x
|
||
|
|
|
||
|
|
using (xs : Vect n a, n : Nat) -- get reordered in dependency order by
|
||
|
|
-- the usual implicit rules
|
||
|
|
baz : xs = xs
|
||
|
|
|
||
|
|
data Test : Type -> Type -> Type where
|
||
|
|
|
||
|
|
using (Test a b)
|
||
|
|
needle : a -> b -> ()
|
||
|
|
nardle : a -> ()
|
||
|
|
noo : b -> ()
|