client = request + reply ->
  - net x <
            ip : '127.0.0.1', port : 8080
            timeout : 10000
          >
          (
            pipe -> 
                    - char-out pipe request; reply = char-in pipe 
          )
  ' x = N_TCP | N_PEER
;
