#45 refactoring tlssv.hs: make and use toTChans