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