implement findKey using right fold