RosettaCodeData/Task/Increment-a-numerical-string/F-Sharp/increment-a-numerical-strin...

4 lines
119 B
Forth

// Increment a numerical string. Nigel Galloway: April 4th., 2023
let inc=int>>(+)1>>string
printfn "%s" (inc("1234"))