let labl_create = create_internal (fun x -> x)