Data.Derive.UniplateDirect
makeUniplateDirect