let
strip_cudf_pool =
function
CudfPool
p
->
p
|
_
->
assert
false