net.lisp: net.lisp: Refactor `string-subipnet' and its friends.