type
  SimRequest = object of RootObj
    case type: SimRequestType
    of UPDATE:
      lpos: float
      rpos: float
    of QUIT:
      # what goes here?