f := (a,b,c)->cat(a,c,c,b):

f("Rosetta","Code",":");