package openai

  1. Overview
  2. Docs

Source file client.ml

1
2
3
4
5
6
7
8
9
10
type t =
  { api_key : string
  ; gen_url : string -> string
  ; c : Curl.t
  }

let create api_key =
  let base_url = "https://api.openai.com" in
  { api_key; gen_url = ( ^ ) base_url; c = Ezcurl_lwt.make () }
;;