cwfact function

Cramer-Wold Factorization