RosettaCodeData/Task/Copy-a-string/LFE/copy-a-string-1.lfe

(let* ((a '"data assigned to a")
       (b a))
  (: io format '"Contents of 'b': ~s~n" (list b)))