let
get_f_called (_id,f,_sgn) = f