Get focused window name on haskell (Windows)

I want to write timetracker. There is exist any way to know focused window name on Haskell?