anchor.diff:      let context = canvas.GetContext "2d"
       
       // ソケットの準備
  -    let playerShipSocket = PlayerShip.initSocket context
  +    let socket = initSocket context
   
       Div [ Width (string width); Attr.Style "float:left" ] -< [
         Div [ Attr.Style "float:center" ] -< [
  
positive.code:   type Mover = {
      x : float
      y : float
    }
  
    [<JavaScript>]
  
negative.code:           (arg.X, arg.Y)
            ||> PlayerShip.nextPosition offset
            |> Json.Stringify
            |> socket.Send
          )
        ]
      ]
  