tableQueryParser :: Parser ImageQueryStatement
tableQueryParser = choice (map try (map (fmap (GetImageQueryResult . TableQuery)) [
    valueInPointParser,
    averageAroundPointParser,
    averageOfImageParser,
    numberOfIslandsParser,
    averageAreaOfIslandsParser,
    averageOutlineOfIslandsParser]))
tableQueryParser :: Parser ImageQueryStatement
tableQueryParser = choice (map try (map (fmap (GetImageQueryResult . TableQuery)) [
    valueInPointParser,
    averageAroundPointParser,
    averageOfImageParser,
    numberOfIslandsParser,
    averageAreaOfIslandsParser,
    averageOutlineOfIslandsParser]))
tableQueryParser = choice (map try (map (fmap (GetImageQueryResult . TableQuery)) [
    valueInPointParser,
    averageAroundPointParser,
    averageOfImageParser,
    numberOfIslandsParser,
    averageAreaOfIslandsParser,
    averageOutlineOfIslandsParser]))