fixed multiple executions of monadic code