is there a mark-word-backward?

[Xah]

is there a reverse of mark-word? something like mark-word-backward?

for example, when i use mark-word to select and extend selection, but
if i went too far, i want to go back.

perhaps i should just implement my own mark-word-forward and mark-word-
backward, by first doing a set-mark-command then backward-word and
forward-word?

  Xah
∑ http://xahlee.org/

☄