RosettaCodeData/Task/Program-termination/R/program-termination.r