package ocaml-ai-sdk

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

Install 

dune-project
 Dependency

github.com Readme Changelog Edit opam file Versions (8)

Authors

  1. A
    Ahrefs

Maintainers

  1. J
    José Nogueira <jose.nogueira@ahrefs.com>

Sources

ocaml-ai-sdk-0.3.tbz
sha256=636d458cb1564ed88ca8c0250c432e91c2f822fd49ad2b923819e762bda10be6
sha512=361e476423ebc0f9cf561cc28ccd4531cf08e424e95eea43a67d6b8dbb457a49a25b418625ffa99f6327fc5df14e540e502d1aa8ed606111c5c010fe498eec2a

doc/src/ocaml-ai-sdk.ai_provider_anthropic/convert_usage.ml.html

Source file convert_usage.ml

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
open Melange_json.Primitives

type cache_creation = {
  ephemeral_5m_input_tokens : int; [@json.default 0]
  ephemeral_1h_input_tokens : int; [@json.default 0]
}
[@@deriving json]

type anthropic_usage = {
  input_tokens : int; [@json.default 0]
  output_tokens : int; [@json.default 0]
  cache_read_input_tokens : int option; [@json.default None]
  cache_creation_input_tokens : int option; [@json.default None]
  cache_creation : cache_creation option; [@json.default None]
  service_tier : string option; [@json.default None]
  inference_geo : string option; [@json.default None]
}
[@@deriving json]

let to_usage u =
  {
    Ai_provider.Usage.input_tokens = u.input_tokens;
    output_tokens = u.output_tokens;
    total_tokens = Some (u.input_tokens + u.output_tokens);
  }

type _ Ai_provider.Provider_options.key += Cache_metrics : anthropic_usage Ai_provider.Provider_options.key

let to_provider_metadata u = Ai_provider.Provider_options.set Cache_metrics u Ai_provider.Provider_options.empty