Refactor for efficiency; alphabetize functions.
Refactor #opponent-mated? into three smaller fns.
Modify spec for #opponent-mated?.