((= f[f:prn:aif(pos _(= s(+""(*:read))))(s:- 1 it)_])#\1)