let
valid_char (c : int) : bool =
c >= 0
&&
c < 256