package awso-eio
Source file io.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92(* 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_groundstation open Awso_eio 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 cancel_contact ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CancelContact input let create_config ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateConfig input let create_dataflow_endpoint_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateDataflowEndpointGroup input let create_dataflow_endpoint_group_v2 ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateDataflowEndpointGroupV2 input let create_ephemeris ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateEphemeris input let create_mission_profile ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateMissionProfile input let delete_config ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteConfig input let delete_dataflow_endpoint_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteDataflowEndpointGroup input let delete_ephemeris ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteEphemeris input let delete_mission_profile ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteMissionProfile input let describe_contact ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeContact input let describe_contact_version ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeContactVersion input let describe_ephemeris ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DescribeEphemeris input let get_agent_configuration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentConfiguration input let get_agent_task_response_url ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetAgentTaskResponseUrl input let get_config ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetConfig input let get_dataflow_endpoint_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetDataflowEndpointGroup input let get_minute_usage ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMinuteUsage input let get_mission_profile ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetMissionProfile input let get_satellite ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSatellite input let list_antennas ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListAntennas input let list_configs ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListConfigs input let list_contact_versions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListContactVersions input let list_contacts ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListContacts input let list_dataflow_endpoint_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListDataflowEndpointGroups input let list_ephemerides ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListEphemerides input let list_ground_station_reservations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListGroundStationReservations input let list_ground_stations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListGroundStations input let list_mission_profiles ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListMissionProfiles input let list_satellites ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSatellites input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let register_agent ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.RegisterAgent input let reserve_contact ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ReserveContact input let tag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TagResource input let untag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UntagResource input let update_agent_status ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateAgentStatus input let update_config ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateConfig input let update_contact ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateContact input let update_ephemeris ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateEphemeris input let update_mission_profile ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateMissionProfile input