Alternatively:
expr /.
foo_f :> RuleCondition[Hold[foo] /. Print -> Echo] /.
Hold[foo_f] :> foo
We can safely perform the second replacement because we just wrapped every f[..] with Hold.
Kuba
- 137.7k
- 13
- 289
- 751