extern double x,y;
extern int maxcnt;

swdoit()
{
    double r0,r1,r2,r3,r4,r5,r6,r7;
    double stat;
    register int count=0;

    r0=4.0;
    r4=0;
    r5=0;
    r7=x;
    r1=y;
    
    do {
	r2 = r4;
	r2 *= r2;

	r3 = r5;
	r3 *= r3;

	r6 = r2;
	r6 -= r3;
	r6 += r7;

	r4 *= r5;
	r4 += r4;
	r4 += r1;

	r5 = r4;
	r4 = r6;

	r2 += r3;
	r2 -= r0;

	++count;
	stat = r2;
    } while ((count<maxcnt) && (stat < 0));
    return count;
}