let create_storable_multiclip ?(abst_len=default_abst_len) file =
  let group = new Config_file.group in
  let op_elts = new Config_file.list_cp
    (Config_file.tuple2_wrappers
     Config_file.string_wrappers
       Config_file.string_wrappers)
      ["elements"]
      ~group
      []
      ""
  in
  let op_abst_len = new Config_file.int_cp ~group ["abstract_length"] abst_len "" in
  let clip = create_multiclip ~abst_len () in
  { clip = clip ;
    file = file ;
    op_group = group ;
    op_abst_len = op_abst_len ;
    op_elts = op_elts ;
  }