sig
  type t
  val string : string -> Sha1.t
  val substring : string -> int -> int -> Sha1.t
  val channel : Pervasives.in_channel -> int -> Sha1.t
  val file : string -> Sha1.t
  val file_fast : string -> Sha1.t
  val output : Pervasives.out_channel -> Sha1.t -> unit
  val input : Pervasives.in_channel -> Sha1.t
  val to_hex : Sha1.t -> string
end