1 2 3 4 5 6 7 8 9
#lang racket (define (double v) ((if (string? v) string-append +) v v)) (string-append "ba" (double "na")) (double 21)