Data.Derive.Fold

makeFold