gistfile1.txt

module Person = struct
  type t = {
    name : string;
     age : int;
  }

  type 'a with_meta = t * 'a
end

type profession = string

let p1 : profession Person.with_meta =
  ({ name = "Bob"; age = 30 }, "Butcher")