package passmaker

  1. Overview
  2. Docs

Module Phrase.Internal

type r32 = {
  1. adj : Word.Adjective.t;
  2. noun : Word.Noun.t;
  3. loc : Word.Location.t;
}
type r64 = {
  1. subj_adj : Word.Adjective.t;
  2. subj_noun : Word.Noun.t;
  3. verb : Word.Verb.t;
  4. obj_adj : Word.Adjective.t;
  5. obj_noun : Word.Noun.t;
  6. obj_loc : Word.Location.t;
}
type t =
  1. | R32 of r32
  2. | R64 of r64
include Prelude.TESTABLE with type t := t
val pp : Format.formatter -> t -> unit
val equal : t -> t -> bool