Idris2/tests/idris2/data/record020/RecordImplicit.idr

8 lines
160 B
Idris
Raw Normal View History

record WithShow (ty : Type) where
constructor MkWS
{auto hasShow : Show ty}
name : String
foo : WithShow ty -> WithShow ty
foo ws = { name := "meh" } ws