Idris2/tests/idris2/interface020/LocalInterface.idr

interface Add a where
  add : a -> a

testAdd : Nat -> Nat -> Nat
testAdd x y = add x
  where
    Add Nat where
      add Z = y
      add (S k) = add k
Add local hints (basic version) This gives us the ability to define and use implementations locally, in where clauses/local let bindings, as well as flag local definitions as hints. It's not yet quite equivalent to global hints, however, since it translated the hint to a local let binding, which doesn't reduce, so if something relies on the reduction behaviour of the hint, it won't work. This refinement is coming later 2020-12-14 16:25:50 +03:00			`interface Add a where`
			`add : a -> a`

			`testAdd : Nat -> Nat -> Nat`
			`testAdd x y = add x`
			`where`
			`Add Nat where`
			`add Z = y`
			`add (S k) = add k`