Function with_title

pub fn with_title<P: Program>(
    program: P,
    title: impl Fn(&P::State, Id) -> String,
) -> impl Program<State = P::State, Message = P::Message, Theme = P::Theme>