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
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
(* 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_bedrock
open Awso_async
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 batch_delete_advanced_prompt_optimization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchDeleteAdvancedPromptOptimizationJob
    input
let batch_delete_evaluation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchDeleteEvaluationJob input
let cancel_automated_reasoning_policy_build_workflow ?endpoint_url ?cfg input
  =
  eval ?endpoint_url ?cfg
    Endpoints.CancelAutomatedReasoningPolicyBuildWorkflow input
let create_advanced_prompt_optimization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAdvancedPromptOptimizationJob input
let create_automated_reasoning_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAutomatedReasoningPolicy input
let create_automated_reasoning_policy_test_case ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAutomatedReasoningPolicyTestCase
    input
let create_automated_reasoning_policy_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAutomatedReasoningPolicyVersion
    input
let create_custom_model ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCustomModel input
let create_custom_model_deployment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCustomModelDeployment input
let create_evaluation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEvaluationJob input
let create_foundation_model_agreement ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateFoundationModelAgreement input
let create_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateGuardrail input
let create_guardrail_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateGuardrailVersion input
let create_inference_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateInferenceProfile input
let create_marketplace_model_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMarketplaceModelEndpoint input
let create_model_copy_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateModelCopyJob input
let create_model_customization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateModelCustomizationJob input
let create_model_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateModelImportJob input
let create_model_invocation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateModelInvocationJob input
let create_prompt_router ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreatePromptRouter input
let create_provisioned_model_throughput ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateProvisionedModelThroughput input
let delete_automated_reasoning_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAutomatedReasoningPolicy input
let delete_automated_reasoning_policy_build_workflow ?endpoint_url ?cfg input
  =
  eval ?endpoint_url ?cfg
    Endpoints.DeleteAutomatedReasoningPolicyBuildWorkflow input
let delete_automated_reasoning_policy_test_case ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAutomatedReasoningPolicyTestCase
    input
let delete_custom_model ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCustomModel input
let delete_custom_model_deployment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCustomModelDeployment input
let delete_enforced_guardrail_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEnforcedGuardrailConfiguration
    input
let delete_foundation_model_agreement ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteFoundationModelAgreement input
let delete_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteGuardrail input
let delete_imported_model ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteImportedModel input
let delete_inference_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteInferenceProfile input
let delete_marketplace_model_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMarketplaceModelEndpoint input
let delete_model_invocation_logging_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteModelInvocationLoggingConfiguration
    input
let delete_prompt_router ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeletePromptRouter input
let delete_provisioned_model_throughput ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteProvisionedModelThroughput input
let delete_resource_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteResourcePolicy input
let deregister_marketplace_model_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeregisterMarketplaceModelEndpoint input
let export_automated_reasoning_policy_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ExportAutomatedReasoningPolicyVersion
    input
let get_advanced_prompt_optimization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAdvancedPromptOptimizationJob input
let get_automated_reasoning_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedReasoningPolicy input
let get_automated_reasoning_policy_annotations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedReasoningPolicyAnnotations
    input
let get_automated_reasoning_policy_build_workflow ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedReasoningPolicyBuildWorkflow
    input
let get_automated_reasoning_policy_build_workflow_result_assets ?endpoint_url
  ?cfg input =
  eval ?endpoint_url ?cfg
    Endpoints.GetAutomatedReasoningPolicyBuildWorkflowResultAssets input
let get_automated_reasoning_policy_next_scenario ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedReasoningPolicyNextScenario
    input
let get_automated_reasoning_policy_test_case ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedReasoningPolicyTestCase input
let get_automated_reasoning_policy_test_result ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedReasoningPolicyTestResult
    input
let get_custom_model ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetCustomModel input
let get_custom_model_deployment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetCustomModelDeployment input
let get_evaluation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEvaluationJob input
let get_foundation_model ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetFoundationModel input
let get_foundation_model_availability ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetFoundationModelAvailability input
let get_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetGuardrail input
let get_imported_model ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetImportedModel input
let get_inference_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetInferenceProfile input
let get_marketplace_model_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMarketplaceModelEndpoint input
let get_model_copy_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetModelCopyJob input
let get_model_customization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetModelCustomizationJob input
let get_model_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetModelImportJob input
let get_model_invocation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetModelInvocationJob input
let get_model_invocation_logging_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetModelInvocationLoggingConfiguration
    input
let get_prompt_router ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetPromptRouter input
let get_provisioned_model_throughput ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetProvisionedModelThroughput input
let get_resource_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetResourcePolicy input
let get_use_case_for_model_access ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetUseCaseForModelAccess input
let list_advanced_prompt_optimization_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAdvancedPromptOptimizationJobs input
let list_automated_reasoning_policies ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAutomatedReasoningPolicies input
let list_automated_reasoning_policy_build_workflows ?endpoint_url ?cfg input
  =
  eval ?endpoint_url ?cfg
    Endpoints.ListAutomatedReasoningPolicyBuildWorkflows input
let list_automated_reasoning_policy_test_cases ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAutomatedReasoningPolicyTestCases
    input
let list_automated_reasoning_policy_test_results ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAutomatedReasoningPolicyTestResults
    input
let list_custom_model_deployments ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCustomModelDeployments input
let list_custom_models ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCustomModels input
let list_enforced_guardrails_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEnforcedGuardrailsConfiguration input
let list_evaluation_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEvaluationJobs input
let list_foundation_model_agreement_offers ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListFoundationModelAgreementOffers input
let list_foundation_models ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListFoundationModels input
let list_guardrails ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListGuardrails input
let list_imported_models ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListImportedModels input
let list_inference_profiles ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInferenceProfiles input
let list_marketplace_model_endpoints ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMarketplaceModelEndpoints input
let list_model_copy_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListModelCopyJobs input
let list_model_customization_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListModelCustomizationJobs input
let list_model_import_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListModelImportJobs input
let list_model_invocation_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListModelInvocationJobs input
let list_prompt_routers ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListPromptRouters input
let list_provisioned_model_throughputs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListProvisionedModelThroughputs input
let list_tags_for_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let put_enforced_guardrail_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutEnforcedGuardrailConfiguration input
let put_model_invocation_logging_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutModelInvocationLoggingConfiguration
    input
let put_resource_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutResourcePolicy input
let put_use_case_for_model_access ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutUseCaseForModelAccess input
let register_marketplace_model_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RegisterMarketplaceModelEndpoint input
let start_automated_reasoning_policy_build_workflow ?endpoint_url ?cfg input
  =
  eval ?endpoint_url ?cfg
    Endpoints.StartAutomatedReasoningPolicyBuildWorkflow input
let start_automated_reasoning_policy_test_workflow ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartAutomatedReasoningPolicyTestWorkflow
    input
let stop_advanced_prompt_optimization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopAdvancedPromptOptimizationJob input
let stop_evaluation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopEvaluationJob input
let stop_model_customization_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopModelCustomizationJob input
let stop_model_invocation_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StopModelInvocationJob 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_automated_reasoning_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAutomatedReasoningPolicy input
let update_automated_reasoning_policy_annotations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAutomatedReasoningPolicyAnnotations
    input
let update_automated_reasoning_policy_test_case ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAutomatedReasoningPolicyTestCase
    input
let update_custom_model_deployment ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateCustomModelDeployment input
let update_guardrail ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateGuardrail input
let update_marketplace_model_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMarketplaceModelEndpoint input
let update_provisioned_model_throughput ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateProvisionedModelThroughput input