Instead of `Term -> Term`, use `Term -> WhnfResult`
Instead of
Term -> Term, useTerm -> WhnfResult