send_response (request, (p_state -&w program_state) {
                                                      return next_action (program_state),
                                                      {
                                                        next_action = select_action (request)
                                                      };
                                                    });
