preproc/pic/common.cpp

85 				const distance &dim, const line_type &lt)
88   assert(dim.x != 0 && dim.y != 0);
93   double psi = atan2(zml.y / dim.y, zml.x / dim.x);
94   position zm = position(dim.x * cos(psi), dim.y * sin(psi));
97   double a_2 = dim.x * dim.x;
99   double b_2 = dim.y * dim.y;
117     ellipse_arc(cent, z0, zm, dim, lt);
118     ellipse_arc(cent, zm, z1, dim, lt);
124 void common_output::dashed_ellipse(const position &cent, const distance &dim,
128   double dim_x = dim.x / 2;
129   double dim_y = dim.y / 2;
135   double lambda = (dim.x - dim.y) / (dim.x + dim.y);
136   double le = M_PI / 2 * (dim.x + dim.y)
177       ellipse_arc(cent, zpre, zdot, dim / 2, slt);
183 void common_output::dotted_ellipse(const position &cent, const distance &dim,
187   double dim_x = dim.x / 2;
188   double dim_y = dim.y / 2;
193   double lambda = (dim.x - dim.y) / (dim.x + dim.y);
194   double le = M_PI / 2 * (dim.x + dim.y)
321 void common_output::rounded_box(const position &cent, const distance &dim,
325     filled_rounded_box(cent, dim, rad, fill);
330     dashed_rounded_box(cent, dim, rad, lt);
333     dotted_rounded_box(cent, dim, rad, lt);
336     solid_rounded_box(cent, dim, rad, lt);
345 				       const distance &dim, double rad,
351   double hor_length = dim.x + (M_PI/2.0 - 2.0)*rad;
357   double vert_length = dim.y + (M_PI/2.0 - 2.0)*rad;
366   dash_arc(cent + position(dim.x/2.0 - rad, -dim.y/2.0 + rad), rad,
368   dash_line(cent + position(dim.x/2.0, -dim.y/2.0 + rad),
369 	    cent + position(dim.x/2.0, dim.y/2.0 - rad),
371   dash_arc(cent + position(dim.x/2.0 - rad, dim.y/2.0 - rad), rad,
375   dash_arc(cent + position(dim.x/2.0 - rad, dim.y/2.0 - rad), rad,
377   dash_line(cent + position(dim.x/2.0 - rad, dim.y/2.0),
378 	    cent + position(-dim.x/2.0 + rad, dim.y/2.0),
380   dash_arc(cent + position(-dim.x/2.0 + rad, dim.y/2.0 - rad), rad,
384   dash_arc(cent + position(-dim.x/2.0 + rad, dim.y/2.0 - rad), rad,
386   dash_line(cent + position(-dim.x/2.0, dim.y/2.0 - rad),
387 	    cent + position(-dim.x/2.0, -dim.y/2.0 + rad),
389   dash_arc(cent + position(-dim.x/2.0 + rad, -dim.y/2.0 + rad), rad,
393   dash_arc(cent + position(-dim.x/2.0 + rad, -dim.y/2.0 + rad), rad,
395   dash_line(cent + position(-dim.x/2.0 + rad, -dim.y/2.0),
396 	    cent + position(dim.x/2.0 - rad, -dim.y/2.0),
398   dash_arc(cent + position(dim.x/2.0 - rad, -dim.y/2.0 + rad), rad,
483 				       const distance &dim, double rad,
489   double hor_length = dim.x + (M_PI/2.0 - 2.0)*rad;
495   double vert_length = dim.y + (M_PI/2.0 - 2.0)*rad;
503   dot_arc(cent + position(dim.x/2.0 - rad, -dim.y/2.0 + rad), rad,
505   dot_line(cent + position(dim.x/2.0, -dim.y/2.0 + rad),
506 	    cent + position(dim.x/2.0, dim.y/2.0 - rad),
508   dot_arc(cent + position(dim.x/2.0 - rad, dim.y/2.0 - rad), rad,
512   dot_arc(cent + position(dim.x/2.0 - rad, dim.y/2.0 - rad), rad,
514   dot_line(cent + position(dim.x/2.0 - rad, dim.y/2.0),
515 	    cent + position(-dim.x/2.0 + rad, dim.y/2.0),
517   dot_arc(cent + position(-dim.x/2.0 + rad, dim.y/2.0 - rad), rad,
521   dot_arc(cent + position(-dim.x/2.0 + rad, dim.y/2.0 - rad), rad,
523   dot_line(cent + position(-dim.x/2.0, dim.y/2.0 - rad),
524 	    cent + position(-dim.x/2.0, -dim.y/2.0 + rad),
526   dot_arc(cent + position(-dim.x/2.0 + rad, -dim.y/2.0 + rad), rad,
530   dot_arc(cent + position(-dim.x/2.0 + rad, -dim.y/2.0 + rad), rad,
532   dot_line(cent + position(-dim.x/2.0 + rad, -dim.y/2.0),
533 	    cent + position(dim.x/2.0 - rad, -dim.y/2.0),
535   dot_arc(cent + position(dim.x/2.0 - rad, -dim.y/2.0 + rad), rad,
592 				      const distance &dim, double rad,
595   position tem = cent - dim/2.0;
600   tem = cent + position(-dim.x/2.0, dim.y/2.0);
605   tem = cent + dim/2.0;
610   tem = cent + position(dim.x/2.0, -dim.y/2.0);
616   end = cent + position(-dim.x/2.0, dim.y/2.0 - rad);
617   line(cent - dim/2.0 + position(0.0, rad), &end, 1, lt);
618   end = cent + position(dim.x/2.0 - rad, dim.y/2.0);
619   line(cent + position(-dim.x/2.0 + rad, dim.y/2.0), &end, 1, lt);
620   end = cent + position(dim.x/2.0, -dim.y/2.0 + rad);
621   line(cent + position(dim.x/2.0, dim.y/2.0 - rad), &end, 1, lt);
622   end = cent + position(-dim.x/2.0 + rad, -dim.y/2.0);
623   line(cent + position(dim.x/2.0 - rad, -dim.y/2.0), &end, 1, lt);
627 				       const distance &dim, double rad,
632   circle(cent + position(dim.x/2.0 - rad, dim.y/2.0 - rad), rad, ilt, fill);
633   circle(cent + position(-dim.x/2.0 + rad, dim.y/2.0 - rad), rad, ilt, fill);
634   circle(cent + position(-dim.x/2.0 + rad, -dim.y/2.0 + rad), rad, ilt, fill);
635   circle(cent + position(dim.x/2.0 - rad, -dim.y/2.0 + rad), rad, ilt, fill);
637   vec[0] = cent + position(dim.x/2.0, dim.y/2.0 - rad);
638   vec[1] = cent + position(-dim.x/2.0, dim.y/2.0 - rad);
639   vec[2] = cent + position(-dim.x/2.0, -dim.y/2.0 + rad);
640   vec[3] = cent + position(dim.x/2.0, -dim.y/2.0 + rad);
642   vec[0] = cent + position(dim.x/2.0 - rad, dim.y/2.0);
643   vec[1] = cent + position(-dim.x/2.0 + rad, dim.y/2.0);
644   vec[2] = cent + position(-dim.x/2.0 + rad, -dim.y/2.0);
645   vec[3] = cent + position(dim.x/2.0 - rad, -dim.y/2.0);