package ocaml-ai-sdk

  1. Overview
  2. Docs
OCaml AI SDK - Provider abstraction for AI models

Install

dune-project
 Dependency

Authors

Maintainers

Sources

ocaml-ai-sdk-0.6.tbz
sha256=44e7f6ebef6da2828ec2844dd5b38c8f37284c08e54a29e06f6a8822df6f8e10
sha512=ce31d0868abf28bcaef7b24a0ab09b37dcfc94db3de96b38ff36a03800ae59a19e8009a35314f93191b3c8f178c40f8569630d4389f56ddc2f2cc94fb7bffc3c

doc/src/ocaml-ai-sdk.ai_provider/middleware.ml.html

Source file middleware.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
module type S = sig
  val wrap_generate : generate:(Call_options.t -> Generate_result.t Lwt.t) -> Call_options.t -> Generate_result.t Lwt.t

  val wrap_stream : stream:(Call_options.t -> Stream_result.t Lwt.t) -> Call_options.t -> Stream_result.t Lwt.t
end

let apply (module Mw : S) (model : Language_model.t) : Language_model.t =
  let (module M : Language_model.S) = model in
  (module struct
    let specification_version = M.specification_version
    let provider = M.provider
    let model_id = M.model_id
    let generate opts = Mw.wrap_generate ~generate:M.generate opts
    let stream opts = Mw.wrap_stream ~stream:M.stream opts
  end)