mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-11-09 07:33:49 +01:00
12 lines
148 B
OCaml
12 lines
148 B
OCaml
open Qptypes
|
|
open Sexplib
|
|
|
|
let to_md5 sexp_of_t t =
|
|
sexp_of_t t
|
|
|> Sexp.to_string
|
|
|> Digest.string
|
|
|> Digest.to_hex
|
|
|> MD5.of_string
|
|
;;
|
|
|