RosettaCodeData/Task/File-input-output/Maple/file-input-output.maple

inout:=proc(filename)
local f;
f:=FileTools[Text][ReadFile](filename);
FileTools[Text][WriteFile]("output.txt",f);
end proc;