Source file io.ml

(* generated by: awso-codegen generate-all --botocore-data vendor/botocore/botocore/data -o aws --runtime-dir lib/runtime/awso --cli-dir awso-cli *)
open Awso_medialive
open Awso_lwt
module Io = Http.Io
let eval ?endpoint_url ?cfg endpoint input =
  Io.bind (Io.resolve_cfg cfg)
    (fun cfg ->
       let meth = Endpoints.method_of_endpoint endpoint in
       let uri = Endpoints.uri_of_endpoint endpoint input in
       Io.map
         (Io.call ?endpoint_url ~cfg ~service:Values.service meth
            (Endpoints.to_request endpoint input) uri)
         (fun resp_result -> Endpoints.of_response endpoint resp_result))
let accept_input_device_transfer ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.AcceptInputDeviceTransfer input
let batch_delete ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchDelete input
let batch_start ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchStart input
let batch_stop ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchStop input
let batch_update_schedule ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchUpdateSchedule input
let cancel_input_device_transfer ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CancelInputDeviceTransfer input
let claim_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ClaimDevice input
let create_channel ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateChannel input
let create_input ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateInput input
let create_input_security_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateInputSecurityGroup input
let create_multiplex ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMultiplex input
let create_multiplex_program ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMultiplexProgram input
let create_partner_input ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreatePartnerInput input
let create_tags ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateTags input
let delete_channel ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteChannel input
let delete_input ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteInput input
let delete_input_security_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteInputSecurityGroup input
let delete_multiplex ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMultiplex input
let delete_multiplex_program ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMultiplexProgram input
let delete_reservation ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteReservation input
let delete_schedule ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteSchedule input
let delete_tags ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteTags input
let describe_account_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeAccountConfiguration input
let describe_channel ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeChannel input
let describe_input ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeInput input
let describe_input_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeInputDevice input
let describe_input_device_thumbnail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeInputDeviceThumbnail input
let describe_input_security_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeInputSecurityGroup input
let describe_multiplex ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeMultiplex input
let describe_multiplex_program ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeMultiplexProgram input
let describe_offering ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeOffering input
let describe_reservation ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeReservation input
let describe_schedule ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeSchedule input
let describe_thumbnails ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeThumbnails input
let list_channels ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListChannels input
let list_input_device_transfers ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInputDeviceTransfers input
let list_input_devices ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInputDevices input
let list_input_security_groups ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInputSecurityGroups input
let list_inputs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInputs input
let list_multiplex_programs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMultiplexPrograms input
let list_multiplexes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMultiplexes input
let list_offerings ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListOfferings input
let list_reservations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListReservations input
let list_tags_for_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let purchase_offering ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PurchaseOffering input
let reboot_input_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RebootInputDevice input
let reject_input_device_transfer ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RejectInputDeviceTransfer input
let start_channel ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartChannel input
let start_input_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartInputDevice input
let start_input_device_maintenance_window ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartInputDeviceMaintenanceWindow input
let start_multiplex ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartMultiplex input
let stop_channel ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopChannel input
let stop_input_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopInputDevice input
let stop_multiplex ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopMultiplex input
let transfer_input_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.TransferInputDevice input
let update_account_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAccountConfiguration input
let update_channel ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateChannel input
let update_channel_class ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateChannelClass input
let update_input ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateInput input
let update_input_device ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateInputDevice input
let update_input_security_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateInputSecurityGroup input
let update_multiplex ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMultiplex input
let update_multiplex_program ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMultiplexProgram input
let update_reservation ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateReservation input
let restart_channel_pipelines ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RestartChannelPipelines input
let create_cloud_watch_alarm_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCloudWatchAlarmTemplate input
let create_cloud_watch_alarm_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCloudWatchAlarmTemplateGroup input
let create_event_bridge_rule_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEventBridgeRuleTemplate input
let create_event_bridge_rule_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEventBridgeRuleTemplateGroup input
let create_signal_map ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateSignalMap input
let delete_cloud_watch_alarm_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCloudWatchAlarmTemplate input
let delete_cloud_watch_alarm_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCloudWatchAlarmTemplateGroup input
let delete_event_bridge_rule_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEventBridgeRuleTemplate input
let delete_event_bridge_rule_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEventBridgeRuleTemplateGroup input
let delete_signal_map ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteSignalMap input
let get_cloud_watch_alarm_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetCloudWatchAlarmTemplate input
let get_cloud_watch_alarm_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetCloudWatchAlarmTemplateGroup input
let get_event_bridge_rule_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEventBridgeRuleTemplate input
let get_event_bridge_rule_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEventBridgeRuleTemplateGroup input
let get_signal_map ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetSignalMap input
let list_cloud_watch_alarm_template_groups ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCloudWatchAlarmTemplateGroups input
let list_cloud_watch_alarm_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCloudWatchAlarmTemplates input
let list_event_bridge_rule_template_groups ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEventBridgeRuleTemplateGroups input
let list_event_bridge_rule_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEventBridgeRuleTemplates input
let list_signal_maps ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListSignalMaps input
let start_delete_monitor_deployment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartDeleteMonitorDeployment input
let start_monitor_deployment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartMonitorDeployment input
let start_update_signal_map ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartUpdateSignalMap input
let update_cloud_watch_alarm_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateCloudWatchAlarmTemplate input
let update_cloud_watch_alarm_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateCloudWatchAlarmTemplateGroup input
let update_event_bridge_rule_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateEventBridgeRuleTemplate input
let update_event_bridge_rule_template_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateEventBridgeRuleTemplateGroup input
let create_channel_placement_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateChannelPlacementGroup input
let create_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCluster input
let create_network ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateNetwork input
let create_node ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateNode input
let create_node_registration_script ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateNodeRegistrationScript input
let delete_channel_placement_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteChannelPlacementGroup input
let delete_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCluster input
let delete_network ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteNetwork input
let delete_node ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteNode input
let describe_channel_placement_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeChannelPlacementGroup input
let describe_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeCluster input
let describe_network ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeNetwork input
let describe_node ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeNode input
let list_channel_placement_groups ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListChannelPlacementGroups input
let list_clusters ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListClusters input
let list_networks ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListNetworks input
let list_nodes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListNodes input
let update_channel_placement_group ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateChannelPlacementGroup input
let update_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateCluster input
let update_network ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateNetwork input
let update_node ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateNode input
let update_node_state ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateNodeState input
let list_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListVersions input
let create_sdi_source ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateSdiSource input
let delete_sdi_source ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteSdiSource input
let describe_sdi_source ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeSdiSource input
let list_sdi_sources ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListSdiSources input
let update_sdi_source ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateSdiSource input
let list_alerts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAlerts input
let list_cluster_alerts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListClusterAlerts input
let list_multiplex_alerts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMultiplexAlerts input