calculations

> f:= sin(x)/(1+cos(x)); ans:=diff(f,x);

>

> f:=-sin(x)/(1-cos(x));diff(f,x);