class ['a] channel_of_output : 'a IO.output -> ['a] acc_out_channel
['a]
'a IO.output ->
acc_out_channel
System.IO.output