genProp name prop = testProperty testName prop
  where
    testName = name ++ " == decode . encode"
genProp name prop = testProperty testName prop
  where
    testName = name ++ " == decode . encode"
genProp name prop = testProperty testName prop
  where
    testName = name ++ " == decode . encode"