Function with_state 

pub fn with_state<T, S, R>(state: S, reactor: R) -> WithState<R, S>
where
    R: Reactor<T, S>,