Verify.Loop_Any
L : Interface.LOOP_ANY
include sig ... end
module I : sig ... end
val identity : 'a L.t -> bool