390 	double x11,y11,x12,y12,x21,y21,x22,y22;  in PaintClosedField()  local
404 	y21=TransY(y+r,z-r);  in PaintClosedField()
408 	painter.PaintRect(x11,y11,x21-x11,y21-y11,color);  in PaintClosedField()
411 		xy[2]=x11; xy[3]=y21;  in PaintClosedField()
415 		painter.PaintEdgeCorrection(x11,y11,x11,y21,color,cl);  in PaintClosedField()
419 		xy[2]=x21; xy[3]=y21;  in PaintClosedField()
423 		painter.PaintEdgeCorrection(x21,y21,x21,y11,color,cr);  in PaintClosedField()
435 	else if (y22>y21) {  in PaintClosedField()
436 		xy[0]=x11; xy[1]=y21;  in PaintClosedField()
437 		xy[2]=x21; xy[3]=y21;  in PaintClosedField()
441 		painter.PaintEdgeCorrection(x11,y21,x21,y21,color,cb);  in PaintClosedField()
442 		if (x12<x11) painter.PaintEdgeCorrection(x12,y22,x11,y21,cl,cb);  in PaintClosedField()
443 		else if (x22>x21) painter.PaintEdgeCorrection(x21,y21,x22,y22,cr,cb);  in PaintClosedField()
632 	double x11,y11,x12,y12,x21,y21,x22,y22;  in PaintXBeam()  local
640 	y21=TransY(y+r,z-r);  in PaintXBeam()
643 	painter.PaintRect(x11,y11,x21-x11,y21-y11,color);  in PaintXBeam()
651 	else if (y22>y21) {  in PaintXBeam()
652 		xy[0]=x11; xy[1]=y21;  in PaintXBeam()
653 		xy[2]=x21; xy[3]=y21;  in PaintXBeam()
666 	double x11,y11,x12,y12,x21,y21,x22,y22;  in PaintYBeam()  local
674 	y21=TransY(y2 ,z-r);  in PaintYBeam()
677 	painter.PaintRect(x11,y11,x21-x11,y21-y11,color);  in PaintYBeam()
680 		xy[2]=x11; xy[3]=y21;  in PaintYBeam()
687 		xy[2]=x21; xy[3]=y21;  in PaintYBeam()
700 	double x11,y11,x12,y12,x21,y21,x22,y22;  in PaintZBeam()  local
708 	y21=TransY(y+r,z );  in PaintZBeam()
713 		xy[2]=x11; xy[3]=y21;  in PaintZBeam()
720 		xy[2]=x21; xy[3]=y21;  in PaintZBeam()
732 	else if (y22>y21) {  in PaintZBeam()
733 		xy[0]=x11; xy[1]=y21;  in PaintZBeam()
734 		xy[2]=x21; xy[3]=y21;  in PaintZBeam()