从Gambit Scheme解释器到文件的管道测试/跟踪

如果我使用了以下步骤，例如：

(define square
  (lambda (n)
    (* n n)))

我使用（方框5）进行测试，例如，如何将这个结果从Gambit Scheme解释器传输到文本文件？

一个解决方案：

(define square
  (lambda (n)
     (* n n)))

(call-with-output-file "a-file.txt"
  (lambda ()
     (display (square 5))
     (newline)))

另一种方法是直接打印到标准输出：

(define square
  (lambda (n)
     (* n n)))

(display (square 5))
(newline)

然后在shell中使用

将输出定向到特定文件