sig
  val load : string -> string * OImages.index8
  val save : string -> string -> OImages.index8 -> unit
  val create : OImages.oimage -> OImages.index8
end