((= f[f:prn:if(= p(pos _(or(= s(readline))1)))(s:- 1 p)_])#\1)