/** * runState :: State s a -> s -> (a, s) * * Unwrap a state monad computation as a function. * * @param M\State $state * @param mixed $initialState * * @return mixed */ function runState(M\State $state, $initialState) { return $state->runState($initialState); }