1line input""t$:if""<t$t$=t$+"
":i=instr(s$+t$,t$):s$=left$(s$,i-1)+t$+mid$(s$,i):goto 1
?s$