The Quantum IO Monad, implemented in Agda