sig
  val schema : (OASISTypes.common_section * OASISTypes.doc) OASISSchema.t
end