(* Programmed by Jedidiah Barber *)
(* Licensed under the Sunset License v1.0 *)


exception Not_an_integer of string



val ( @@ ) : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'b

val ( |> ) : ('a -> 'b) -> 'a -> 'b



val call_with_open_input_file : filename:string -> func:(in_channel -> 'a) -> 'a

val call_with_open_output_file : filename:string -> func:(out_channel -> 'a) -> 'a



val read_integer_list : string -> Z.t array

val read_sequence_file : string -> Z.t array