sig
val
cots_connect : string
->
string
->
Unix
.file_descr
end