;; print polar (degrees) (bind-func CprintPd (lambda (num:gsl_complex*) (printf "(%f cis %f)\n" (Cmag num) (* 57.295791 (Carg num)))))