#109 asyncClient.hs: make function open' which use TChan