(setq A (point 5 5)) (setq C (circle A 5)) C (iangle C 90)