The Mathematics of Radio Location Step 2: General Intersection of Two Circles
[Choose Edit-->Configure-->Consolas Font on Windows XP]

kill(all);

A : (x)^2 + (y)^2 - 1^2 ;

B : (x-h)^2 + (y-k)^2 - r^2 ;

A = B;

A - B = 0;

C : expand(A - B = 0);

D : rhs(first(solve(C,y)));

E : substitute(D,y,A);

X : solve(E,x);

x1 : second(first(X)); x2 : second(second(X));

D;

y1 : radcan(substitute(x1,x,D));

y2 : radcan(substitute(x2,x,D));

[x1,y1];

[x2,y2];