let myClock = ref(HLC.make(~node="myNodeId"));

type message = {
  content: string,
  clock: string, // serialized HLC
};

let sendMessage = (content) => {
  myClock := HLC.increment(myClock^);
  let message = {
    content,
    clock: HLC.toString(myClock^),
  };
};

let receiveMessage = remoteMessage => {
  myClock :=
    HLC.receive(
      myClock^,
      HLC.fromString(remoteMessage.clock) |> Belt.Option.getExn,
    );
};