wolfram-mathematica - 如何在 Mathematica 函数中禁用区分大小写？

Question

我想让 mathematica 对函数的第一个大写字母不敏感。例如，它接受“Plot”和“plot”作为绘图函数。

Answer 1

我同意 george的情绪:“你不想那样做。”通常的做法是以小写字母开头用户符号，这既可以识别它们又可以防止与内置函数发生冲突。不过，您可以通过多种方式做到这一点。一种是像乔治也建议的那样创建别名，例如

plot = Plot;
sin = Sin;

plot[sin[x], {x, 0, 6}]

这具有即使在包中也能工作的优势，因为它不依赖于前端。但是，因为这些是 not true aliases它在某些情况下会失败，例如:

evaluate = Evaluate;
Hold[evaluate[2 + 2]]

Hold[evaluate[2 + 2]]

而“真实”函数的行为是这样的:

Hold[Evaluate[2 + 2]]

Hold[4]

要获得完全等效，尽管只在前端，您可以使用 $PreRead。 ( Example 。)您将需要构建一个规则列表，将每个小写符号的字符串形式替换为大写字符串。我将只对 System` 上下文中的所有符号执行此操作。

With[{rules = Thread[ToLowerCase[#] -> #] & @ Names["System`*"]},
  $PreRead = # /. rules &
];

现在这两个例子都有效了:

plot[sin[x], {x, 0, 6}]

hold[evaluate[2 + 2], 3 + 4]

后者产生:

Hold[4, 3 + 4]