RosettaCodeData/Task/Function-definition/TXR/function-definition-2.txr

3 lines
62 B
Plaintext

(defun mult (a b) (* a b))
(put-line `3 * 4 = @(mult 3 4)`)