kill(all)$

circle0(color):=x^2 + y^2 = r[color]^2;

circle1(color):= (x-h[color])^2+(y-k[color])^2 = r[color]^2;

circle0(red);

circle1(blue);

circleProduct : circle0(red)*circle1(blue);

    Solve for y

circleProduct;

van = facebook.com/LearningCalculus$