implement write procedure `write-shared`

[PollRobots]

implement and test write-shared from the write library