Mavryk_layer2_store.Context_sigsmodule Equality_witness : sig ... endtype ('a, 'b) equality_witness = 'a Equality_witness.t * 'b Equality_witness.ttype ('a, 'repo) index = ('a, 'repo) raw_index constraint 'a = [< `Read | `Write Read ]type ('a, 'repo, 'tree) t = {index : ('a, 'repo) index;tree : 'tree;} constraint 'a = [< `Read | `Write Read ]module type S = sig ... end