ghc-options: -fno-warn-unused-do-bind -fno-warn-name-shadowing
takeInputD, takeInputWithLeftoversD