RosettaCodeData/Task/Increment-a-numerical-string/EchoLisp/increment-a-numerical-string.l

(number->string (1+ (string->number "665")))
    → "666"