structure AppUpdate =
struct
  open AppType

  fun update (model: app_type, inputMsg) =
    case #mode model of
      NORMAL_MODE => NormalMode.update (model, inputMsg)
    | MOVE_MODE => MoveMode.update (model, inputMsg)
end