j
k
j a
j l
j xs = maybeLast . filter snd . zip [0..] $ zipWith (<) xs (drop 1 xs) where maybeLast [] = Nothing maybeLast xs = Just (last xs)
Make that j xs = fmap fst . maybeLast . ... etc. -Yitz
Back to the thread
Back to the list
