module type Symbol_T =sig
..end
Create(S: Symbol_T)
functor defined
below.type
t
type 'a
map
val map : (t -> 'a) -> 'a map
map f
to construct a map from symbols to state
transitions.val get : 'a map -> t -> 'a
get m s
to get the state transition from map m
for
the symbol s
.