在 Oz 中如何将整数转换为列表，反之亦然？

Question

如何将整数转换为列表并以 Oz 格式转换回来？我需要将 321 这样的数字反转为 123。

Oz 中的 Reverse 函数仅适用于列表，因此我想将 321 转换为 [3 2 1]，反转它，然后将 [1 2 3] 转换回 123。这可以在 Oz 中完成吗？

Answer 1

免责声明：直到 5 分钟前我才真正了解 Oz，并且只阅读了维基百科上的示例，因此以下内容可能充满错误。但是，它应该可以让您了解如何解决该问题。 （使函数尾递归作为练习留给读者）。

更新：以下版本已经过测试并且可以工作。

local
  % turns 123 into [3,2,1]
  fun {Listify N}
    if N == 0 then nil
    else (N mod 10) | {Listify (N div 10)}
    end
  end

  % turns [1,2,3] into 321
  fun {Unlistify L}
    case
      L of nil then 0
      [] H|T then H + 10 * {Unlistify T}
    end
  end
in
  % Turns 123 into 321
  {Browse {Unlistify {Reverse {Listify 123}}}}
end

Answer 2

这应该更简洁地实现这一点：

{Show {StringToInt {Reverse {IntToString 123}}}}

干杯