((def f #(f(if(=(read)'=)(-(do(prn %)%)1)(inc %))))-1)