let labl_create = create_internal (fun id -> id)