RosettaCodeData/Task/Increment-a-numerical-string/Racket/increment-a-numerical-strin...

3 lines
72 B
Racket

#lang racket
(define next (compose number->string add1 string->number))