RosettaCodeData/Task/Increment-a-numerical-string/EMal/increment-a-numerical-string.emal

11 lines
359 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
fun incrementGeneric = text by generic T, text numerical
return text!(:T!numerical + 1)
end
fun increment = text by text numerical
return incrementGeneric(when(numerical.contains("."), real, int), numerical)
end
writeLine(incrementGeneric(real, "123.32"))
writeLine(incrementGeneric(int, "123"))
writeLine(increment("123.32"))
writeLine(increment("123"))