let causal_states = Measure.Causal_states.causal_states
(*     significance_level discard_cell Auto.neighbourhoods pop_depth future_depth *)
    significance_level discard_cell Topo.neighbourhoods past_depth pof_depth