L S =S INPUT :S(L)
 S " " = :S(L)
 S ? LEN(X =X + 1) . OUTPUT RTAB(0) $ S :S(L)
 OUTPUT =S
END