"Testing expsin"

clear

check(expsin(x) == 1/2*i*exp(-i*x)-1/2*i*exp(i*x))
