data Result = Result {
~{indent 4 $ intercalate ",\n" $ map field $ handlerOutputFields m h}}

$(AT.deriveJSON AT.defaultOptions ''Result)