sig
  val create_fun0 :
    Sqlite3.db ->
    string ->
    init:'-> step:('-> 'a) -> final:('-> Sqlite3.Data.t) -> unit
  val create_fun1 :
    Sqlite3.db ->
    string ->
    init:'->
    step:('-> Sqlite3.Data.t -> 'a) -> final:('-> Sqlite3.Data.t) -> unit
  val create_fun2 :
    Sqlite3.db ->
    string ->
    init:'->
    step:('-> Sqlite3.Data.t -> Sqlite3.Data.t -> 'a) ->
    final:('-> Sqlite3.Data.t) -> unit
  val create_funN :
    Sqlite3.db ->
    string ->
    init:'->
    step:('-> Sqlite3.Data.t array -> 'a) ->
    final:('-> Sqlite3.Data.t) -> unit
end