RPL

<< 273 + 4 ^ 5.67E-8>>
'A'
STO
で,変数Aに,黒体放射エネルギの計算手順を登録。
使用例:
T=1000℃の場合,\sigma T^4の計算は,
VARキーで変数Aをファンクションキーに表示しておき。
1000A
と入力すれば,
149000
と出力され,計算終了です。

Maple

数式の計算コスト

> expr := expand(sin(3*x)*cos(2*x));
expr := 8 sin(x) cos(x)^4 - 6 sin(x) cos(x)^2 + sin(x)

> codegen[cost](expr);
2 additions + 8 multiplications + 5 functions

特定の関数の個数を調べる numboccur 関数
(式にある表現がいくつ含まれているかを調べたい時に利用。)

> big_expr:=expand(sin(7*x));

big_expr := 64 sin(x) cos(x)^6 - 80 sin(x) cos(x)^4
+ 24 sin(x) cos(x)^2 - sin(x)

式 big_expr に sin(x) がいくつ含まれているかを調べます。
> numboccur(big_expr,sin(x));
4