package ocaml-ai-sdk
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
OCaml AI SDK - Provider abstraction for AI models
Install
dune-project
Dependency
Authors
Maintainers
Sources
ocaml-ai-sdk-0.4.tbz
sha256=4f3f22ae61d360b994cd75323bcb6b6bf915f6755fd1e7bab6844ca8a240c1e7
sha512=3c52b17096da818f5d3bcf9fe16826c3bec4533d6a1681e8ba0f957f37ee4f425696017cb78f1a24732f8851010d436cf446f873b72b6a4f5004d6b492072abf
doc/ocaml-ai-sdk.ai_provider_openai/Ai_provider_openai/Openai_api/index.html
Module Ai_provider_openai.Openai_apiSource
HTTP client for the OpenAI Chat Completions API.
Source
val make_request_body :
model:string ->
messages:Melange_json.t list ->
?temperature:float ->
?top_p:float ->
?max_tokens:int ->
?max_completion_tokens:int ->
?frequency_penalty:float ->
?presence_penalty:float ->
?stop:string list ->
?seed:int ->
?response_format:Melange_json.t ->
?tools:Melange_json.t list ->
?tool_choice:Melange_json.t ->
?parallel_tool_calls:bool ->
?logit_bias:Melange_json.t ->
?logprobs:bool ->
?top_logprobs:int ->
?user:string ->
?reasoning_effort:string ->
?store:bool ->
?metadata:Melange_json.t ->
?prediction:Melange_json.t ->
?service_tier:string ->
stream:bool ->
unit ->
request_bodyBuild a typed request body for the Chat Completions API.
Source
val chat_completions :
config:Config.t ->
body:request_body ->
extra_headers:(string * string) list ->
stream:bool ->
[ `Json of Yojson.Basic.t | `Stream of string Lwt_stream.t ] Lwt.tSend a request to the Chat Completions API. Returns `Json for non-streaming, `Stream for streaming (raw SSE lines).
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>