Added implementations for `output-file-open?` and `input-file-open?`
Updating implementation doc
Updating `close-port` to deal with binary ports
Tidying up implementation of `output-file-open?` and `input-file-open?`