RosettaCodeData/Task/Program-name/Aime/program-name.aime

o_text(argv(0));
o_byte('\n');