Sub TCP_CloseSocket(socket)
Closes a socket