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.3.tbz
sha256=636d458cb1564ed88ca8c0250c432e91c2f822fd49ad2b923819e762bda10be6
sha512=361e476423ebc0f9cf561cc28ccd4531cf08e424e95eea43a67d6b8dbb457a49a25b418625ffa99f6327fc5df14e540e502d1aa8ed606111c5c010fe498eec2a
doc/ocaml-ai-sdk.ai_provider/Ai_provider/Prompt/index.html
Module Ai_provider.PromptSource
Prompt messages with role-constrained content parts.
Each message role restricts which content parts are valid:
System: text onlyUser: text and filesAssistant: text, files, reasoning, and tool callsTool: tool results only
How file data is represented.
Source
type user_part = | Text of {text : string;provider_options : Provider_options.t;
}| File of {data : file_data;media_type : string;filename : string option;provider_options : Provider_options.t;
}
A single part in a user message.
Source
type assistant_part = | Text of {text : string;provider_options : Provider_options.t;
}| File of {data : file_data;media_type : string;filename : string option;provider_options : Provider_options.t;
}| Reasoning of {text : string;provider_options : Provider_options.t;
}| Tool_call of {id : string;name : string;args : Yojson.Basic.t;provider_options : Provider_options.t;
}
A single part in an assistant message.
Content returned with a tool result.
Source
type tool_result = {tool_call_id : string;tool_name : string;result : Yojson.Basic.t;is_error : bool;content : tool_result_content list;provider_options : Provider_options.t;
}A tool execution result.
Source
type message = | System of {}| User of {content : user_part list;
}| Assistant of {content : assistant_part list;
}| Tool of {content : tool_result list;
}
A prompt message. The role constrains valid content parts.
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>