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.5.tbz
sha256=9e3437d6ebf48ec9f5d9a8afd62eaeece124023f02dbd87e4b291205fd309b72
sha512=605c10ed62c0cbc31a151b7031cc80a284d5c94231c1ef423ae7439572e3fadddab4a45f52eaeeef83973a8e324839b9fda03f9082deef1b6781353f63975510
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 15module 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)
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>