Pervasives
.in_channel
->
OOChannel
.char_input_channel