Kappa_data_structures.ToolsSourceMisc utilities
recti f x n = f (f (f .. (f (f x 0) 1) ..) (n-1)
val array_min_equal_not_null :
(int * 'a list) array ->
(int * 'b list) array ->
('a list * 'b list) optionval get_product_image_occ_2 :
int ->
(int -> int -> int) ->
(int -> int -> int) ->
'a list ->
'a list ->
intval find_available_name :
already_there:(string -> bool) ->
string ->
facultative:string ->
ext:string option ->
string