14 lines
371 B
Plaintext
14 lines
371 B
Plaintext
let s = import "../schemas/state.ncl" in
|
|
|
|
{
|
|
make_state = fun data => s.State & data,
|
|
make_transition = fun data => s.Transition & data,
|
|
make_dimension = fun data => s.Dimension & data,
|
|
make_coupling = fun data => s.Coupling & data,
|
|
|
|
State = s.State,
|
|
Transition = s.Transition,
|
|
Dimension = s.Dimension,
|
|
Coupling = s.Coupling,
|
|
}
|