#5213 trigexpand shrinks domain of csc/sec

[David Scherfgen]

A : sec(2*x)$
B : trigexpand(A)$

subst(x = 0, A);  /* 1 */
subst(x = 0, B);  /* ERROR: csc: argument 0 isn't in the domain of csc. */