fix treeInstance#foldMapRight1 

previous version does not satisfy the `Foldable1` law