(#0=dotimes,20(print(/(let1 r -1(#0#,11(with-input-from-string(read-line)(pa$ port-map(rec,x(inc! r))read)))r)3)))