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
open Awso_comprehend
open Awso_sync
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_detect_dominant_language ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchDetectDominantLanguage input
let batch_detect_entities ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchDetectEntities input
let batch_detect_key_phrases ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchDetectKeyPhrases input
let batch_detect_sentiment ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchDetectSentiment input
let batch_detect_syntax ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchDetectSyntax input
let batch_detect_targeted_sentiment ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.BatchDetectTargetedSentiment input
let classify_document ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ClassifyDocument input
let contains_pii_entities ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ContainsPiiEntities input
let create_dataset ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateDataset input
let create_document_classifier ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateDocumentClassifier input
let create_endpoint ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateEndpoint input
let create_entity_recognizer ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateEntityRecognizer input
let create_flywheel ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateFlywheel input
let delete_document_classifier ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDocumentClassifier input
let delete_endpoint ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteEndpoint input
let delete_entity_recognizer ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteEntityRecognizer input
let delete_flywheel ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteFlywheel input
let delete_resource_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteResourcePolicy input
let describe_dataset ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeDataset input
let describe_document_classification_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeDocumentClassificationJob input
let describe_document_classifier ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeDocumentClassifier input
let describe_dominant_language_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeDominantLanguageDetectionJob
input
let describe_endpoint ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeEndpoint input
let describe_entities_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeEntitiesDetectionJob input
let describe_entity_recognizer ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeEntityRecognizer input
let describe_events_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeEventsDetectionJob input
let describe_flywheel ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeFlywheel input
let describe_flywheel_iteration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeFlywheelIteration input
let describe_key_phrases_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeKeyPhrasesDetectionJob input
let describe_pii_entities_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribePiiEntitiesDetectionJob input
let describe_resource_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeResourcePolicy input
let describe_sentiment_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeSentimentDetectionJob input
let describe_targeted_sentiment_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeTargetedSentimentDetectionJob
input
let describe_topics_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeTopicsDetectionJob input
let detect_dominant_language ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectDominantLanguage input
let detect_entities ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectEntities input
let detect_key_phrases ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectKeyPhrases input
let detect_pii_entities ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectPiiEntities input
let detect_sentiment ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectSentiment input
let detect_syntax ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectSyntax input
let detect_targeted_sentiment ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectTargetedSentiment input
let detect_toxic_content ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DetectToxicContent input
let import_model ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ImportModel input
let list_datasets ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDatasets input
let list_document_classification_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDocumentClassificationJobs input
let list_document_classifier_summaries ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDocumentClassifierSummaries input
let list_document_classifiers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDocumentClassifiers input
let list_dominant_language_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDominantLanguageDetectionJobs input
let list_endpoints ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEndpoints input
let list_entities_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEntitiesDetectionJobs input
let list_entity_recognizer_summaries ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEntityRecognizerSummaries input
let list_entity_recognizers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEntityRecognizers input
let list_events_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListEventsDetectionJobs input
let list_flywheel_iteration_history ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListFlywheelIterationHistory input
let list_flywheels ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListFlywheels input
let list_key_phrases_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListKeyPhrasesDetectionJobs input
let list_pii_entities_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListPiiEntitiesDetectionJobs input
let list_sentiment_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListSentimentDetectionJobs input
let list_tags_for_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let list_targeted_sentiment_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTargetedSentimentDetectionJobs input
let list_topics_detection_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTopicsDetectionJobs input
let put_resource_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutResourcePolicy input
let start_document_classification_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartDocumentClassificationJob input
let start_dominant_language_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartDominantLanguageDetectionJob input
let start_entities_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartEntitiesDetectionJob input
let start_events_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartEventsDetectionJob input
let start_flywheel_iteration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartFlywheelIteration input
let start_key_phrases_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartKeyPhrasesDetectionJob input
let start_pii_entities_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartPiiEntitiesDetectionJob input
let start_sentiment_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartSentimentDetectionJob input
let start_targeted_sentiment_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartTargetedSentimentDetectionJob input
let start_topics_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartTopicsDetectionJob input
let stop_dominant_language_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopDominantLanguageDetectionJob input
let stop_entities_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopEntitiesDetectionJob input
let stop_events_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopEventsDetectionJob input
let stop_key_phrases_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopKeyPhrasesDetectionJob input
let stop_pii_entities_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopPiiEntitiesDetectionJob input
let stop_sentiment_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopSentimentDetectionJob input
let stop_targeted_sentiment_detection_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopTargetedSentimentDetectionJob input
let stop_training_document_classifier ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopTrainingDocumentClassifier input
let stop_training_entity_recognizer ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopTrainingEntityRecognizer 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_endpoint ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateEndpoint input
let update_flywheel ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateFlywheel input