IOモナドで使うときだけログを吐く関数を定義する - 北海道苫小牧市出身の初老PGが書くブログ http://hiratara.hatenadiary.jp/entry/2017/06/15/085810 読んでる。
同じよう事がしばしばあって、例えば自分もIOのときだけ時間計測して表示したいことがあって、アドホックに変なことをしたのを思い出した。
https://github.com/msakai/toysolver/commit/6bf8d922205a32c0cb9b2a6f33856bb338687798#diff-58ed667759bc98493bab055023ecd9c6
のenableTimeRecordingのところ。