Extract Main.updateModel
Inline Main.update/moveDocument
Inline Main.insertInModel
Extract Entry.insertAction
Extract Entry.goLeftAction
Get rid of command parameter to Action type
Convert Entry go functions to actions
Extract Core.Array.applyAt