algebrite
Version:
Computer Algebra System in Coffeescript
28 lines (19 loc) • 557 B
text/coffeescript
test_circexp = ->
run_test [
"circexp(cos(x))",
"1/2*exp(-i*x)+1/2*exp(i*x)",
"circexp(sin(x))",
"1/2*i*exp(-i*x)-1/2*i*exp(i*x)",
"circexp(tan(x))",
"i*exp(-i*x)/(exp(-i*x)+exp(i*x))-i*exp(i*x)/(exp(-i*x)+exp(i*x))",
"circexp(cosh(x))",
"1/2*exp(x)+1/2*exp(-x)",
"circexp(sinh(x))",
"1/2*exp(x)-1/2*exp(-x)",
"circexp(tanh(x))",
"-1/(1+exp(2*x))+exp(2*x)/(1+exp(2*x))",
"circexp((cos(x),sin(x)))",
"(1/2*exp(-i*x)+1/2*exp(i*x),1/2*i*exp(-i*x)-1/2*i*exp(i*x))",
"circexp(cos(x)*sin(x))-expcos(x)*expsin(x)",
"0",
]