c?(d:e)|elem(c,d)$zip"+<>-""-><+"=e;c?d=c:d;main=interact$foldr(?)""