pub fn update(
  model: Model,
  msg: Msg,
) -> #(Model, Effect(reachable/app/msg.Msg))