pub fn with_subscription<P: Program>( program: P, f: impl Fn(&P::State) -> Subscription<P::Message>, ) -> impl Program<State = P::State, Message = P::Message, Theme = P::Theme>