POLAR 는 한점을 기준으로 각도와 거리를 가진 새로운 점을 생성합니다
문장 형식은 (polar 기준점 각도 길이) 이며 각도는 라디안값 입니다
(setq pr1 (polar pl1 0 len)) ;; pl1 에서 0도로 len 거리의 점을 pr1 으로 저장
(setq po3(polar po2 pi (- xx tt))) ; pi 는 3.14159 값을 가진 고유변수입니다 따라서 각도는 라디안 3.14159 입니다 거리값은 xx 에서 tt를 뺀 값으로 합니다
pi 는 사용자 임의 변수로는 거부되며 오류처리됩니다
0도는 + x 수평방향
pi/2 = 90도 = + y 수직방향
pi = 180도 = -x 수평방향
pi x 1.5 = 270도 = -y 수직방향
(setq a90(/ pi 2)) ; pi 는 180도 이므로 pi의 절반값은 90 도입니다
(setq po5(polar pt a90 yy)) ; pt 에서 90도 yy 거리의 점을 po5 로 저장합니다
(setq p1 (polar p0 (* pi 1.25) dia2)) ; pi 에 1.25 곱한 값을 각도로 합니다 이 각도는 225 도에 해당합니다