((rec(f x n)(or(<(dec! n)0)(dolist(i'(1 2 3))(print x i)(f #`" ,x,|i|."n))))""(read))