let
drop t ~index =
let
l,r = unrevSplit t index
in
r