channelParser :: Parser ImageQueryParameter
channelParser = do
    string "set_channel"
    spaces
    channeltype <- channelTypeParser
    return (Channel channeltype)
channelParser :: Parser ImageQueryParameter
channelParser = do
    string "set_channel"
    spaces
    channeltype <- channelTypeParser
    return (Channel channeltype)
channelParser = do
    string "set_channel"
    spaces
    channeltype <- channelTypeParser
    return (Channel channeltype)