RosettaCodeData/Task/String-case/Transd/string-case.transd
2023-07-01 13:44:08 -04:00

9 lines
143 B
Text

#lang transd
MainModule: {
_start: (λ
(with s "alphaBETA"
(lout (toupper s))
(lout (tolower s)))
)
}