Subversion Repositories wimsdev

Rev

Rev 18353 | Rev 18358 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 18353 Rev 18356
Line 1980... Line 1980...
1980
      scale(res,pm->p,1);
1980
      scale(res,pm->p,1);
1981
      scale2(res[2],res[2],&rx,&ry);
1981
      scale2(res[2],res[2],&rx,&ry);
1982
      myGdImageArc(image,pm->p[0],pm->p[1],rx,ry,180+(beta-alpha)/DEG,180+(beta+alpha)/DEG,pm->color[0]);
1982
      myGdImageArc(image,pm->p[0],pm->p[1],rx,ry,180+(beta-alpha)/DEG,180+(beta+alpha)/DEG,pm->color[0]);
1983
      if (tikz_file) fprintf(tikz_file, "(%i,%i) arc (%f:%f:%i and %i);\n",
1983
      if (tikz_file) fprintf(tikz_file, "(%i,%i) arc (%f:%f:%i and %i);\n",
1984
        (int)rint(pm->p[0]-rx*cos(beta-alpha)), flip((int)rint(pm->p[1]-ry*sin(beta-alpha))),
1984
        (int)rint(pm->p[0]-rx*cos(beta-alpha)), flip((int)rint(pm->p[1]-ry*sin(beta-alpha))),
1985
          (beta-alpha)/DEG,(beta+alpha)/DEG, (int)rint(rx),-(int)rint(ry));
1985
          180+(beta-alpha)/DEG,180+(beta+alpha)/DEG, (int)rint(rx),-(int)rint(ry));
1986
    }
1986
    }
1987
    else {
1987
    else {
1988
      double gamma;
1988
      double gamma;
1989
      if (pd[1]*pd[1]+pd[0]*pd[0] > pd[2]*pd[2]+pd[3]*pd[3])
1989
      if (pd[1]*pd[1]+pd[0]*pd[0] > pd[2]*pd[2]+pd[3]*pd[3])
1990
        gamma = atan2(pd[1],pd[0]);
1990
        gamma = atan2(pd[1],pd[0]);