sig
  type 'a list_
  type 'a cursor
  val to_cursor : 'Reins.ListCursor.S.list_ -> 'Reins.ListCursor.S.cursor
  val from_cursor :
    'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.list_
  val at_front : 'Reins.ListCursor.S.cursor -> bool
  val at_back : 'Reins.ListCursor.S.cursor -> bool
  val move_next :
    'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.cursor
  val move_prev :
    'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.cursor
  val goto_front :
    'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.cursor
  val goto_back :
    'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.cursor
  val value : 'Reins.ListCursor.S.cursor -> 'a option
  val list : 'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.list_
  val replace_list :
    'Reins.ListCursor.S.list_ ->
    'Reins.ListCursor.S.cursor -> 'Reins.ListCursor.S.cursor
end