(=> (Cis $X $Y) (Complex-Number $Y)) (=> (= (Cis ?Radians) ?Complex) (Not (Complex-Number ?Radians)))