TransparentStateSets of names
val empty : tEverything opaque
val full : tEverything transparent
val is_empty : t -> boolval is_transparent_variable : t -> Names.Id.t -> boolval is_transparent_constant : t -> Names.Constant.t -> boolval is_transparent_projection : t -> Names.Projection.Repr.t -> bool