on master help sign in
fixed a second stupid error in unzip3, also indentation
commitf287e5fa1dab8ff6a0477cf8f853a8f5e849feef authorJP Smith <jp.smith@ilstu.edu> dateTue 14 Oct 2014, 10:24 (12 years ago) parent023f6f1
1 file changed+1−1
libs/prelude/Prelude/Vect.idr+1−1
libs/prelude/Prelude/Vect.idr+1−1
@@ -226,7 +226,7 @@ unzip ((l, r)::xs) with (unzip xs)
226226
227227||| Convert a vector of three-tuples to a triplet of vectors
228228unzip3 : Vect n (a, b, c) -> (Vect n a, Vect n b, Vect n c)
229−unzip3 [] = []
229+unzip3 [] = ([], [], [])
230230unzip3 ((l,c,r)::xs) with (unzip3 xs)
231231 | (lefts, centers, rights) = (l::lefts, c::centers, r::rights)
232232