Llio.tupleX

what about ?
```OCaml
val threesum : (buf -> 'a) -> 
                        (buf -> 'b) -> 
                        (buf -> 'c) -> 
                        ('a -> 'b -> 'c -> 'd) -> 
                        'd
```