使用Aeson解析嵌套的对象数组

I want to parse a JSON object and create a JSONEvent with the given I want to parse a JSON object and create a JSON