BEGIN{ pi=3.141592654; xmin=0.02; xmax=10; ymin=1; ymax=500; acc[1]=0.1; acc[2]=0.2; acc[3]=0.5; acc[4]=1; acc[5]=2; acc[6]=5; acc[7]=10; acc[8]=20; acc[9]=50; acc[10]=100; acc[11]=200; acc[12]=500; acc[13]=1000; acc[14]=2000; acc[15]=5000; acc[16]=10000; acc[17]=20000; acc[18]=50000; acc[19]=100000; for(i=1;i<=19;i++){ x1=-99;y1=-99;x2=-99;y2=-99; Sa=acc[i]; T=xmin; Sv=Sa/2/pi*T if(ymin<=Sv&&Sv<=ymax){x1=xmin;y1=Sv} Sv=ymin; T=2*pi*Sv/Sa if(xmin<=T&&T<=xmax){x1=T;y1=ymin} T=xmax; Sv=Sa/2/pi*T if(ymin<=Sv&&Sv<=ymax){x2=xmax;y2=Sv} Sv=ymax; T=2*pi*Sv/Sa if(xmin<=T&&T<=xmax){x2=T;y2=ymax} if((0" print x1,y1 print x2,y2 } } dis[1]=0.01; dis[2]=0.02; dis[3]=0.05; dis[4]=0.1; dis[5]=0.2; dis[6]=0.5; dis[7]=1; dis[8]=2; dis[9]=5; dis[10]=10; dis[11]=20; dis[12]=50; dis[13]=100; dis[14]=200; dis[15]=500; dis[16]=1000; dis[17]=2000; dis[18]=5000; dis[19]=10000; for(i=1;i<=19;i++){ x1=-99;y1=-99;x2=-99;y2=-99; Sd=dis[i]; T=xmin; Sv=Sd/T*2*pi if(ymin<=Sv&&Sv<=ymax){x1=xmin;y1=Sv} Sv=ymax; T=2*pi*Sd/Sv if(xmin<=T&&T<=xmax){x1=T;y1=ymax} T=xmax; Sv=Sd/T*2*pi if(ymin<=Sv&&Sv<=ymax){x2=xmax;y2=Sv} Sv=ymin; T=2*pi*Sd/Sv if(xmin<=T&&T<=xmax){x2=T;y2=ymin} if((0" print x1,y1 print x2,y2 } } }