sig
val
( << ) :
Pervasives
.out_channel
->
string
->
unit
end