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