let
is_i =
function
Cl
(
I
), _
->
true
|
_
->
false