Pervasives.out_channel -> OOChannel.char_output_channel