959 double rad, tenpowmag,
d, x;
962 int mt, mag, i, j, k, zheight;
964 char buf[64], plab[32], nlab[32];
965 bool centered =
false;
978 tenpowmag = pow(10.0, (
double) mag);
990 for (mag = -20; mag < 20; mag++) {
993 * pow(10.0, (
double) mag) /
maxrad;
1022 i = j * pow(10.0, (
double) mag) * pixperunit / 2;
1023 if (i / 5 > graph->
grid.
xaxis.circular.radius + pixperunit
1024 + ((relcx > 0) ? relcx : - relcx))
1026 x = j * pow(10.0, (
double) (mag));
1032 (void) sprintf(plab,
"%lg", (2-x)/x);
1033 (void) sprintf(nlab,
"-%lg",(1+x)/x);
1036 (
int)(relcx + pixperunit), relcy,plab,nlab);
1037 if (i * 2.5 < graph->
grid.
xaxis.circular.radius
1038 + ((relcx > 0) ? relcx : - relcx))
1050 fprintf(
cp_err,
"smithgrid: Internal Error: screwed up\n");
1056 graph->
grid.
xaxis.circular.radius, 0.0, 0.0);
1057 if ((relcx + pixperunit > - graph->
grid.
xaxis.circular.radius )
1058 && (relcx + pixperunit < graph->grid.xaxis.circular.radius )) {
1059 zheight = graph->
grid.
xaxis.circular.radius
1060 *
sin(acos((
double) (relcx + pixperunit)
1063 zheight = - zheight;
1064 x1 = graph->
grid.
xaxis.circular.center + relcx + pixperunit;
1065 y1 = graph->
grid.
yaxis.circular.center - zheight;
1066 x2 = graph->
grid.
xaxis.circular.center + relcx + pixperunit;
1067 y2 = graph->
grid.
yaxis.circular.center + zheight;
1076 if ((relcy > - graph->
grid.
xaxis.circular.radius )
1077 && (relcy < graph->grid.xaxis.circular.radius )) {
1078 zheight = graph->
grid.
xaxis.circular.radius
1079 *
cos(asin((
double) relcy / graph->
grid.
xaxis.circular.radius ));
1081 zheight = - zheight;
1083 graph->
grid.
yaxis.circular.center + relcy,
1084 graph->
grid.
xaxis.circular.center + zheight,
1085 graph->
grid.
yaxis.circular.center + relcy);
1097 gi_text(
"0", gr_xcenter + gr_radius +
gi_fntwidth, gr_ycenter -
1099 gi_text(
"o", gr_xcenter + gr_radius +
gi_fntwidth * 2, gr_ycenter, 0,
1101 gi_text(
"90", gr_xcenter -
gi_fntwidth, gr_ycenter + gr_radius +
1103 gi_text(
"o", gr_xcenter +
gi_fntwidth, gr_ycenter + gr_radius +
1105 gi_text(
"180", gr_xcenter - gr_radius -
gi_fntwidth * 5, gr_ycenter
1107 gi_text(
"o", gr_xcenter - gr_radius -
gi_fntwidth * 2, gr_ycenter, 0,
1109 gi_text(
"-90", gr_xcenter -
gi_fntwidth * 2, gr_ycenter - gr_radius -
1111 gi_text(
"o", gr_xcenter +
gi_fntwidth, gr_ycenter - gr_radius -
static char buf[MAXPROMPT]
union graph::@4::@7 yaxis
struct graph::@3 datawindow
union graph::@4::@7 xaxis