···11(* Zarr jsont codecs *)
2233+[@@@ai_disclosure "ai-generated"]
44+[@@@ai_model "claude-opus-4"]
55+[@@@ai_provider "Anthropic"]
66+37module Other_codec = struct
48 type t = { name : string; configuration : Jsont.json }
59
+4
src/zarr_jsont.mli
···11(** Jsont codecs for Zarr v2 and v3 metadata. *)
2233+[@@@ai_disclosure "ai-generated"]
44+[@@@ai_model "claude-opus-4"]
55+[@@@ai_provider "Anthropic"]
66+37(** Fill value that encodes the value stored in unwritten or missing chunks. *)
48type fill_value = [
59 | `Null
+4
test/test_zarr_jsont.ml
···11+[@@@ai_disclosure "ai-generated"]
22+[@@@ai_model "claude-opus-4"]
33+[@@@ai_provider "Anthropic"]
44+15let decode c s = match Jsont_bytesrw.decode_string c s with
26 | Ok v -> v | Error e -> failwith e
37