apl>" <-APL2-------------------- sam315.txt ---------------------------->
apl>)run cap2/sample/graph.inc
apl>" <-APL2-------------------- graph.txt ----------------------------->
apl>" Legend describing various global values:
apl>"
apl>" World coordinates(wc) are those of the real data.
apl>" Graph coordinates(gc) are those of the graph.
apl>"
apl>" caption - Override to text for graph caption. If null, a caption
apl>" will be generated. The graph function resets the global
apl>" caption variable to null at the end of its processing.
apl>"
apl>" hk ------ Constant coefficient of input. If xr=1 (see below) then
apl>" hk becomes the constant imaginary coefficient for all
apl>" values of x on the graph. If xr=0, hk will be the constant
apl>" real coefficient.
apl>"
apl>" htl ----- 0 = both, 1 = headers, 2 = trailers, 3 = neither.
apl>"
apl>" maxx ---- Maximum x axis value in world coordinates.
apl>"
apl>" maxy ---- Maximum y axis value in world coordinates.
apl>"
apl>" minx ---- Minimum x axis value in world coordinates.
apl>"
apl>" miny ---- Minimum y axis value in world coordinates.
apl>"
apl>" mgc ----- Vertical margin in graphic coordinates.
apl>"
apl>" n ------- Synonymous with hk (see above). The x values to which
apl>" the function is applied to obtain y values are derived
apl>" by first creating xwc as a vector of integers uniformly
apl>" distributed between minx and maxx inclusive. Then, either
apl>" 'x#(nX0j1)+xwc' or 'x#n+0j1Xxwc' is evaluated.
apl>"
apl>" nlb ----- 1 = Label the curve with the n value.
apl>"
apl>" points -- Number of points to generate.
apl>"
apl>" xgc ----- Array of x values for data points in graph coordinates.
apl>"
apl>" xiv ----- x axis marker interval in world coordinates.
apl>"
apl>" xlin ---- Width of graph in inches.
apl>"
apl>" xpg ----- Divide xwc by xpg to get xgc.
apl>"
apl>" xpi ----- Array of three values for minx, maxx, and xiv, used when
apl>" invoking the graph function and the array of x values
apl>" spans -pi to +pi.
apl>"
apl>" xr ------ 1=vary real x coefficient, 0=vary imaginary coefficient,
apl>" holding the other coefficient to the constant hk (see above.).
apl>"
apl>" xt ------ Used in a variety of places to temporarily generate
apl>" graphics coordinates.
apl>"
apl>" xwc ----- Array of x values in world coordinates.
apl>"
apl>" yadj ---- Adjustment down to print text below a line.
apl>"
apl>" yabm ---- Maximum absolute value (öy) to appear on graph.
apl>"
apl>" ygc ----- Array of y values for data points in graph coordinates.
apl>"
apl>" ylin ---- Height of graph in inches.
apl>"
apl>" ymgn ---- Margin in inches at top and bottom of y axis.
apl>"
apl>" ypg ----- Divide ywc by ypg to get ygc.
apl>"
apl>" yt ------ Used in a variety of places to temporarily generate
apl>" graphics coordinates.
apl>"
apl>" ywc ----- Array of y values for data points in world coordinates.
apl>"
apl>" Set global values. -------------------------------------------->
apl>"
apl>caption#'' " Empty caption causes one to be generated.
apl>i#11 " Circle function code to extract imag. coef. of complex number.
apl>points#200 " Number of data points to generate on graph.
apl>r#9 " Circle function code to extract real coef. of complex number.
apl>xlin#4.5 " Width of graph in inches.
apl>" minx = -3.14159....
apl>" ö maxx = 3.14159....
apl>" ö ö xiv
apl>" ö ö ö
apl>" V V V
apl>xpi#(O-1),(O1),O.25
apl>ylin#6 " Height of graph in inches.
apl>ymgn#.2 " Margin in inches at top and bottom of y axis.
apl>"
apl>" <----------------------------------------------------------------->
apl>" Generates the LaTeX Öput statements for the data points to appear
apl>" on the graph.
apl>"
apl>Lex 'dodata'
1
apl>Gdodata
Ä1Å xgc#(xwc_minx)%xpg " xgc=x graphic coordinates for data points.
Ä2Å ygc#mgc+(ywc_miny)%ypg " ygc=y graphic coordinates for data points.
Ä3Å $bylabXI0=nlb " Branch if the curve is not to be labelled.
Ä4Å '%Label the curve'
Ä5Å xt#1Y(u=S/u#öywc)/xgc " x coord where maximum/mininum occurs
Ä6Å yt#(_yadjX0>vs/ywc)+(vs#xt=xgc)/ygc " y coord of maximum/minimum
Ä7Å " Note: Calculation for yt works only if all minima occur below
Ä8Å " y axis, and all maxima occur above.
Ä9Å pcon,(xt,',',Ä1.5Åyt),`Z')änÖ#',(Fhk),'å'
Ä10Å bylab:'%Draw the data points'
Ä11Å pcon,((xgc#-1U1Uxgc),',',Ä1.5Å(ygc#-1U1Uygc)),circon
Ä12Å G
apl>" <----------------------------------------------------------------->
apl>" Generate xwc and ywc, the arrays of x/y coordinates for the data
apl>" points to appear on the graph.
apl>"
apl>Lex 'genxy'
1
apl>Ggenxy
Ä1Å xwc#minx+(xlwc#maxx_minx)X(-1+Ipoints+1)%points
Ä2Å $varyrealXIxr
Ä3Å x#hk+0j1Xxwc " real part is constant, imaginary varies.
Ä4Å $calcy " Branch to compute values of y for data points.
Ä5Å varyreal:x#(hkX0j1)+xwc " Imaginary is constant, real varies.
Ä6Å calcy:ywc#eOCfun " Compute values of y for data points
Ä7Å ywcm#yabm>öywc " Mask of keepers, magnitudes of y < yabm.
Ä8Å xwc#ywcm/xwc " Pick the keepers.
Ä9Å ywc#ywcm/ywc " Pick the keepers.
Ä10Å G
apl>"
apl>" <----------------------------------------------------------------->
apl>" Main graph routine.
apl>"
apl>Lex 'graph'
1
apl>Gfun graph a
Ä1Å "Graphs the imaginary or real coefficient of result of fun.
Ä2Å " fun = expression to evaluate.
Ä3Å (htl nlb xr e yabm minx maxx xiv hk yiv yca)#a
Ä4Å genxy " Generate the data points.
Ä5Å $dataXIhtl>1 " Branch if htl greater than 1.
Ä6Å scale " Calculate global scaling values.
Ä7Å headers " Generate LaTeX figure headers.
Ä8Å data:dodata " Process and graph data points.
Ä9Å trailers " Generate Latex figure trailers, maybe.
Ä10Å G
apl>"
apl>" <----------------------------------------------------------------->
apl>" Generates the LaTeX statements to begin the graph.
apl>"
apl>Lex 'headers'
1
apl>Gheaders
Ä1Å 'ÖbeginäfigureåÄtbhÅ'
Ä2Å $gencapXI0=Rcaption " Branch if no caption override.
Ä3Å 'Öcaptionä',caption,'å'
Ä4Å $begin
Ä5Å gencap:$realcapXI(xr=1)&hk=0 " Branch if x data are not complex.
Ä6Å $ncaptionXInlb=0 " Branch if curves are not labelled with n value.
Ä7Å 'ÖcaptionäGraph of yÖ#',(Fe),'O',fun,'+nX0j1å'
Ä8Å $begin
Ä9Å ncaption:$cplxcapXIxr " Branch if varying real coefficient.
Ä10Å 'ÖcaptionäGraph of yÖ#',(Fe),'O',(-1Ufun),(Fhk),'+xX0j1å'
Ä11Å $begin
Ä12Å cplxcap:'ÖcaptionäGraph of yÖ#',(Fe),'O',fun,'+(nÖ#',(Fhk),')X0j1å'
Ä13Å $begin
Ä14Å realcap:'ÖcaptionäGraph of yÖ#',fun,'å'
Ä15Å begin:'Öbeginäcenterå'
Ä16Å 'ÖsetlengthäÖunitlengthåä',(Flin),'inå'
Ä17Å 'Öbeginäpictureå(',(Fxlin%lin),',',(Fylin%lin),')'
Ä18Å '%Draw a frame around the picture'
Ä19Å ' Öput(0,0)äÖline(1,0)ä',(Fxlgc),'åå% bottom'
Ä20Å ' Öput(0,0)äÖline(0,1)ä',(Fylgc),'åå% left'
Ä21Å ' Öput(0,',(Fylgc),')äÖline(1,0)ä',(Fxlgc),'åå% top'
Ä22Å ' Öput(',(Fxlgc),',0)äÖline(0,1)ä',(Fylgc),'åå% right'
Ä23Å '%Draw the x axis'
Ä24Å ' Öput(0,',(Fxax),')äÖline(1,0)ä',(Fxlgc),'åå%x axis'
Ä25Å xt#xoff%xpg
Ä26Å pcon,((xt,Ä1.5Å','),xax),circon " Draw the x axis markers.
Ä27Å xt#xt_xpgX.1Xxmk<0
Ä28Å yt#xax+((.05%lin)Xxax=mgc)_yadjXxax>mgc
Ä29Å $dopaxXIpix
Ä30Å '%Draw the x axis marker values'
Ä31Å pcon,xt,',',yt,econ,xmk,Ä1.5Åscon
Ä32Å $doyax
Ä33Å dopax:'%Draw the x axis marker values in pi'
Ä34Å picon#(`Z'Öfracä') ,`1 'Öpiåä4å' 'Öpiåä2å' '3Öpiåä4å'
Ä35Å picon#('-',`1`Rpicon),'0',picon
Ä36Å pcon,xt,',',yt,econ,picon,Ä1.5Åscon
Ä37Å doyax:'%Draw the y axis'
Ä38Å $putymkXI(yax=0)
Ä39Å ' Öput(',(Fyax),',0)äÖline(0,1)ä',(Fylgc),'åå%y axis'
Ä40Å putymk:'%Draw the y axis markers'
Ä41Å ymask#ymk^=0
Ä42Å yt#ymask/mgc+(ymk_miny)%ypg
Ä43Å pcon,yax,',',yt,Ä1.5Åcircon
Ä44Å '%Draw the y axis marker values'
Ä45Å xt#yax+.05%lin
Ä46Å yt#yt_ypgX.1X(ymask/ymk)<0
Ä47Å pcon,xt,',',yt,econ,(ymask/ymk),Ä1.5Åscon
Ä48Å G
apl>"
apl>" <----------------------------------------------------------------->
apl>" Calculates a variety of values needed to produce the graph.
apl>"
apl>Lex 'scale'
1
apl>Gscale
Ä1Å $byyXIyca " Branch if ylwc, maxy, miny are precalculated.
Ä2Å ylwc#(maxy#S/ywc)_miny#D/ywc
Ä3Å byy:ylap#ylin_2Xymgn " ylap=height allowed for data points.
Ä4Å lin#(xlin%xlwc)Dylap%ylwc " unitlength in inches.
Ä5Å yadj#.14%lin " y graphic coordinate adjustment to print text below line.
Ä6Å mgc#ymgn%lin " Margin in graph coordinates.
Ä7Å xpg#xlwc%xlgc#xlin%lin " Divide xwc by xpg to get gc.
Ä8Å ypg#ylwc%(_2Xymgn%lin)+ylgc#ylin%lin " Divide ywc by ypg to get gc.
Ä9Å xax#(yz#(minyK0)&maxyZ0)Xmgc+(öminy)%ypg " xaxis in graph coordinates.
Ä10Å yax#(xz#(minx<0)&maxx>0)X(öminx)%xpg " yaxis in graph coordinates.
Ä11Å $piaxisXIpix#(minx=O-1)&maxx=O1 " branch if pi units on x axis.
Ä12Å xic#(yax=0)+Dxlwc%xiv
Ä13Å $doyiv
Ä14Å piaxis:xic#Dxlwc%xiv#O.25
Ä15Å doyiv:$doyicXIyiv^=0
Ä16Å yiv#10*D10@ylwc
Ä17Å doyic:yic#yic+0=2öyic#Dylwc%yiv
Ä18Å xoff#(I-1+xic)Xxiv " Offset from minx in world coord. of x markers.
Ä19Å yoff#(_yiv)+(Iyic)Xyiv " Offset from miny in world coord. of y markers.
Ä20Å $yoffplusXIminy>0
Ä21Å ymk#yoff+miny+yivööminy
Ä22Å $yoffdone
Ä23Å yoffplus:ymk#yoff+miny_yivöminy " y for y axis markers in world coord.
Ä24Å yoffdone:xmk#minx+xoff " x for x axis markers in world coord.
Ä25Å circon#`Z')äÖcircle*ä',(F.0205%lin),'åå'
Ä26Å scon#`Z'$å'
Ä27Å econ#`Z')ä$'
Ä28Å pcon#`Z' Öput('
Ä29Å G
apl>"
apl>" <----------------------------------------------------------------->
apl>" Generates the LaTeX statements to finish the graph.
apl>"
apl>Lex 'trailers'
1
apl>Gtrailers
Ä1Å $epicXIhtl=0 " Branch if both headers and trailers.
Ä2Å $eojckXInlb " Branch if graph already labelled.
Ä3Å pcon,(1Yxgc+xpgX.1),',',(1Yygc),')ä',fun,'å' " Label the graph.
Ä4Å eojck:$eojXI(htl=1)+htl=3 " br if headers only, or neither.
Ä5Å epic:'Öendäpictureå'
Ä6Å 'Öendäcenterå'
Ä7Å eoj:'%Finis.'
Ä8Å caption#'' " Reset global caption
Ä9Å G
apl>" htl: 0=both, 1=headers, 2=trailers, 3=neither.
apl>" ö nlb 1 = Label the curve.
apl>" ö ö xr = 1=vary real x coeff, 0=vary imaginary coeff.
apl>" ö ö ö e = i(11) or r(9) to select coefficient to graph.
apl>" ö ö ö ö yabm = maximum öy printed on graph.
apl>" ö ö ö ö ö minx = minimum value of x.
apl>" ö ö ö ö ö ö maxx = maximum value of x.
apl>" ö ö ö ö ö ö ö xiv = x axis marker interval.
apl>" ö ö ö ö ö ö ö ö hk = Constant coefficient of input.
apl>" ö ö ö ö ö ö ö ö ö yiv = y axis marker interval, or 0.
apl>" ö ö ö ö ö ö ö ö ö ö yca = ylwc, maxy, miny are precalculated.
apl>" ö ö ö ö ö ö ö ö ö ö ö
apl>" V V V V V V V V V V V
apl>ylwc#(maxy#8)_miny#-8
apl> '6Ox' graph 1,1,1,r,8 ,-4,4,1 ,0.5 , 1 ,1 " coshdatx.tex
ÖbeginäfigureåÄtbhÅ
ÖcaptionäGraph of yÖ#9O6Ox+nX0j1å
Öbeginäcenterå
ÖsetlengthäÖunitlengthåä .35inå
Öbeginäpictureå(12.85714,17.14286)
%Draw a frame around the picture
Öput(0,0)äÖline(1,0)ä12.85714åå% bottom
Öput(0,0)äÖline(0,1)ä17.14286åå% left
Öput(0,17.14286)äÖline(1,0)ä12.85714åå% top
Öput(12.85714,0)äÖline(0,1)ä17.14286åå% right
%Draw the x axis
Öput(0,8.571429)äÖline(1,0)ä12.85714åå%x axis
Öput( 1.607143 , 8.571429 )äÖcircle*ä .05857143åå
Öput( 3.214286 , 8.571429 )äÖcircle*ä .05857143åå
Öput( 4.821429 , 8.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 8.571429 )äÖcircle*ä .05857143åå
Öput( 8.035714 , 8.571429 )äÖcircle*ä .05857143åå
Öput( 9.64286 , 8.571429 )äÖcircle*ä .05857143åå
Öput( 11.25 , 8.571429 )äÖcircle*ä .05857143åå
%Draw the x axis marker values
Öput( 1.54492 , 8.171429 )ä$ -3 $å
Öput( 3.152063 , 8.171429 )ä$ -2 $å
Öput( 4.759206 , 8.171429 )ä$ -1 $å
Öput( 6.428571 , 8.171429 )ä$ 0 $å
Öput( 8.035714 , 8.171429 )ä$ 1 $å
Öput( 9.64286 , 8.171429 )ä$ 2 $å
Öput( 11.25 , 8.171429 )ä$ 3 $å
%Draw the y axis
Öput(6.428571,0)äÖline(0,1)ä17.14286åå%y axis
%Draw the y axis markers
Öput( 6.428571 , .571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 1.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 2.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 3.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 4.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 5.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 6.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 7.571429 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 9.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 10.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 11.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 12.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 13.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 14.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 15.57143 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 16.57143 )äÖcircle*ä .05857143åå
%Draw the y axis marker values
Öput( 6.571429 , .47142857 )ä$ -8 $å
Öput( 6.571429 , 1.471429 )ä$ -7 $å
Öput( 6.571429 , 2.471429 )ä$ -6 $å
Öput( 6.571429 , 3.471429 )ä$ -5 $å
Öput( 6.571429 , 4.471429 )ä$ -4 $å
Öput( 6.571429 , 5.471429 )ä$ -3 $å
Öput( 6.571429 , 6.471429 )ä$ -2 $å
Öput( 6.571429 , 7.471429 )ä$ -1 $å
Öput( 6.571429 , 9.57143 )ä$ 1 $å
Öput( 6.571429 , 10.57143 )ä$ 2 $å
Öput( 6.571429 , 11.57143 )ä$ 3 $å
Öput( 6.571429 , 12.57143 )ä$ 4 $å
Öput( 6.571429 , 13.57143 )ä$ 5 $å
Öput( 6.571429 , 14.57143 )ä$ 6 $å
Öput( 6.571429 , 15.57143 )ä$ 7 $å
Öput( 6.571429 , 16.57143 )ä$ 8 $å
%Label the curve
Öput( 1.8 , 16.4128 )änÖ# .5å
%Draw the data points
Öput( 1.864286 , 16.10731 )äÖcircle*ä .05857143åå
Öput( 1.928571 , 15.81388 )äÖcircle*ä .05857143åå
Öput( 1.992857 , 15.53203 )äÖcircle*ä .05857143åå
Öput( 2.057143 , 15.26133 )äÖcircle*ä .05857143åå
Öput( 2.121429 , 15.00133 )äÖcircle*ä .05857143åå
Öput( 2.185714 , 14.75161 )äÖcircle*ä .05857143åå
Öput( 2.25 , 14.51179 )äÖcircle*ä .05857143åå
Öput( 2.314286 , 14.28147 )äÖcircle*ä .05857143åå
Öput( 2.378571 , 14.06029 )äÖcircle*ä .05857143åå
Öput( 2.442857 , 13.84790 )äÖcircle*ä .05857143åå
Öput( 2.507143 , 13.64394 )äÖcircle*ä .05857143åå
Öput( 2.571429 , 13.4481 )äÖcircle*ä .05857143åå
Öput( 2.635714 , 13.26008 )äÖcircle*ä .05857143åå
Öput( 2.7 , 13.07955 )äÖcircle*ä .05857143åå
Öput( 2.764286 , 12.90623 )äÖcircle*ä .05857143åå
Öput( 2.828571 , 12.73985 )äÖcircle*ä .05857143åå
Öput( 2.892857 , 12.58015 )äÖcircle*ä .05857143åå
Öput( 2.957143 , 12.42685 )äÖcircle*ä .05857143åå
Öput( 3.021429 , 12.27973 )äÖcircle*ä .05857143åå
Öput( 3.085714 , 12.13854 )äÖcircle*ä .05857143åå
Öput( 3.15 , 12.00306 )äÖcircle*ä .05857143åå
Öput( 3.214286 , 11.87307 )äÖcircle*ä .05857143åå
Öput( 3.278571 , 11.74836 )äÖcircle*ä .05857143åå
Öput( 3.342857 , 11.62874 )äÖcircle*ä .05857143åå
Öput( 3.407143 , 11.514 )äÖcircle*ä .05857143åå
Öput( 3.471429 , 11.40398 )äÖcircle*ä .05857143åå
Öput( 3.535714 , 11.29849 )äÖcircle*ä .05857143åå
Öput( 3.6 , 11.19737 )äÖcircle*ä .05857143åå
Öput( 3.664286 , 11.10044 )äÖcircle*ä .05857143åå
Öput( 3.728571 , 11.00757 )äÖcircle*ä .05857143åå
Öput( 3.792857 , 10.91859 )äÖcircle*ä .05857143åå
Öput( 3.857143 , 10.83337 )äÖcircle*ä .05857143åå
Öput( 3.921429 , 10.75176 )äÖcircle*ä .05857143åå
Öput( 3.985714 , 10.67365 )äÖcircle*ä .05857143åå
Öput( 4.05 , 10.5989 )äÖcircle*ä .05857143åå
Öput( 4.114286 , 10.52739 )äÖcircle*ä .05857143åå
Öput( 4.178571 , 10.45902 )äÖcircle*ä .05857143åå
Öput( 4.242857 , 10.39366 )äÖcircle*ä .05857143åå
Öput( 4.307143 , 10.33123 )äÖcircle*ä .05857143åå
Öput( 4.371429 , 10.2716 )äÖcircle*ä .05857143åå
Öput( 4.435714 , 10.2147 )äÖcircle*ä .05857143åå
Öput( 4.5 , 10.16043 )äÖcircle*ä .05857143åå
Öput( 4.564286 , 10.10870 )äÖcircle*ä .05857143åå
Öput( 4.628571 , 10.05943 )äÖcircle*ä .05857143åå
Öput( 4.692857 , 10.01254 )äÖcircle*ä .05857143åå
Öput( 4.757143 , 9.96796 )äÖcircle*ä .05857143åå
Öput( 4.821429 , 9.92561 )äÖcircle*ä .05857143åå
Öput( 4.885714 , 9.88543 )äÖcircle*ä .05857143åå
Öput( 4.95 , 9.84735 )äÖcircle*ä .05857143åå
Öput( 5.014286 , 9.81131 )äÖcircle*ä .05857143åå
Öput( 5.078571 , 9.77726 )äÖcircle*ä .05857143åå
Öput( 5.142857 , 9.74514 )äÖcircle*ä .05857143åå
Öput( 5.207143 , 9.71489 )äÖcircle*ä .05857143åå
Öput( 5.271429 , 9.68648 )äÖcircle*ä .05857143åå
Öput( 5.335714 , 9.65985 )äÖcircle*ä .05857143åå
Öput( 5.4 , 9.63496 )äÖcircle*ä .05857143åå
Öput( 5.464286 , 9.61177 )äÖcircle*ä .05857143åå
Öput( 5.528571 , 9.59025 )äÖcircle*ä .05857143åå
Öput( 5.592857 , 9.57036 )äÖcircle*ä .05857143åå
Öput( 5.657143 , 9.55206 )äÖcircle*ä .05857143åå
Öput( 5.721429 , 9.53534 )äÖcircle*ä .05857143åå
Öput( 5.785714 , 9.52016 )äÖcircle*ä .05857143åå
Öput( 5.85 , 9.50650 )äÖcircle*ä .05857143åå
Öput( 5.914286 , 9.494328 )äÖcircle*ä .05857143åå
Öput( 5.978571 , 9.483638 )äÖcircle*ä .05857143åå
Öput( 6.042857 , 9.474407 )äÖcircle*ä .05857143åå
Öput( 6.107143 , 9.466621 )äÖcircle*ä .05857143åå
Öput( 6.171429 , 9.460268 )äÖcircle*ä .05857143åå
Öput( 6.235714 , 9.455337 )äÖcircle*ä .05857143åå
Öput( 6.3 , 9.45182 )äÖcircle*ä .05857143åå
Öput( 6.364286 , 9.449713 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 9.449011 )äÖcircle*ä .05857143åå
Öput( 6.492857 , 9.449713 )äÖcircle*ä .05857143åå
Öput( 6.557143 , 9.45182 )äÖcircle*ä .05857143åå
Öput( 6.621429 , 9.455337 )äÖcircle*ä .05857143åå
Öput( 6.685714 , 9.460268 )äÖcircle*ä .05857143åå
Öput( 6.75 , 9.466621 )äÖcircle*ä .05857143åå
Öput( 6.814286 , 9.474407 )äÖcircle*ä .05857143åå
Öput( 6.878571 , 9.483638 )äÖcircle*ä .05857143åå
Öput( 6.942857 , 9.494328 )äÖcircle*ä .05857143åå
Öput( 7.007143 , 9.50650 )äÖcircle*ä .05857143åå
Öput( 7.071429 , 9.52016 )äÖcircle*ä .05857143åå
Öput( 7.135714 , 9.53534 )äÖcircle*ä .05857143åå
Öput( 7.2 , 9.55206 )äÖcircle*ä .05857143åå
Öput( 7.264286 , 9.57036 )äÖcircle*ä .05857143åå
Öput( 7.328571 , 9.59025 )äÖcircle*ä .05857143åå
Öput( 7.392857 , 9.61177 )äÖcircle*ä .05857143åå
Öput( 7.457143 , 9.63496 )äÖcircle*ä .05857143åå
Öput( 7.521429 , 9.65985 )äÖcircle*ä .05857143åå
Öput( 7.585714 , 9.68648 )äÖcircle*ä .05857143åå
Öput( 7.65 , 9.71489 )äÖcircle*ä .05857143åå
Öput( 7.714286 , 9.74514 )äÖcircle*ä .05857143åå
Öput( 7.778571 , 9.77726 )äÖcircle*ä .05857143åå
Öput( 7.842857 , 9.81131 )äÖcircle*ä .05857143åå
Öput( 7.907143 , 9.84735 )äÖcircle*ä .05857143åå
Öput( 7.971429 , 9.88543 )äÖcircle*ä .05857143åå
Öput( 8.035714 , 9.92561 )äÖcircle*ä .05857143åå
Öput( 8.1 , 9.96796 )äÖcircle*ä .05857143åå
Öput( 8.164286 , 10.01254 )äÖcircle*ä .05857143åå
Öput( 8.228571 , 10.05943 )äÖcircle*ä .05857143åå
Öput( 8.292857 , 10.10870 )äÖcircle*ä .05857143åå
Öput( 8.357143 , 10.16043 )äÖcircle*ä .05857143åå
Öput( 8.421429 , 10.2147 )äÖcircle*ä .05857143åå
Öput( 8.485714 , 10.2716 )äÖcircle*ä .05857143åå
Öput( 8.55 , 10.33123 )äÖcircle*ä .05857143åå
Öput( 8.614286 , 10.39366 )äÖcircle*ä .05857143åå
Öput( 8.678571 , 10.45902 )äÖcircle*ä .05857143åå
Öput( 8.742857 , 10.52739 )äÖcircle*ä .05857143åå
Öput( 8.807143 , 10.5989 )äÖcircle*ä .05857143åå
Öput( 8.871429 , 10.67365 )äÖcircle*ä .05857143åå
Öput( 8.935714 , 10.75176 )äÖcircle*ä .05857143åå
Öput( 9 , 10.83337 )äÖcircle*ä .05857143åå
Öput( 9.064286 , 10.91859 )äÖcircle*ä .05857143åå
Öput( 9.128571 , 11.00757 )äÖcircle*ä .05857143åå
Öput( 9.192857 , 11.10044 )äÖcircle*ä .05857143åå
Öput( 9.257143 , 11.19737 )äÖcircle*ä .05857143åå
Öput( 9.321429 , 11.29849 )äÖcircle*ä .05857143åå
Öput( 9.385714 , 11.40398 )äÖcircle*ä .05857143åå
Öput( 9.45 , 11.514 )äÖcircle*ä .05857143åå
Öput( 9.51429 , 11.62874 )äÖcircle*ä .05857143åå
Öput( 9.57857 , 11.74836 )äÖcircle*ä .05857143åå
Öput( 9.64286 , 11.87307 )äÖcircle*ä .05857143åå
Öput( 9.70714 , 12.00306 )äÖcircle*ä .05857143åå
Öput( 9.77143 , 12.13854 )äÖcircle*ä .05857143åå
Öput( 9.83571 , 12.27973 )äÖcircle*ä .05857143åå
Öput( 9.9 , 12.42685 )äÖcircle*ä .05857143åå
Öput( 9.96429 , 12.58015 )äÖcircle*ä .05857143åå
Öput( 10.02857 , 12.73985 )äÖcircle*ä .05857143åå
Öput( 10.09286 , 12.90623 )äÖcircle*ä .05857143åå
Öput( 10.15714 , 13.07955 )äÖcircle*ä .05857143åå
Öput( 10.22143 , 13.26008 )äÖcircle*ä .05857143åå
Öput( 10.28571 , 13.4481 )äÖcircle*ä .05857143åå
Öput( 10.35 , 13.64394 )äÖcircle*ä .05857143åå
Öput( 10.41429 , 13.84790 )äÖcircle*ä .05857143åå
Öput( 10.47857 , 14.06029 )äÖcircle*ä .05857143åå
Öput( 10.54286 , 14.28147 )äÖcircle*ä .05857143åå
Öput( 10.60714 , 14.51179 )äÖcircle*ä .05857143åå
Öput( 10.67143 , 14.75161 )äÖcircle*ä .05857143åå
Öput( 10.73571 , 15.00133 )äÖcircle*ä .05857143åå
Öput( 10.8 , 15.26133 )äÖcircle*ä .05857143åå
Öput( 10.86429 , 15.53203 )äÖcircle*ä .05857143åå
Öput( 10.92857 , 15.81388 )äÖcircle*ä .05857143åå
Öput( 10.99286 , 16.10731 )äÖcircle*ä .05857143åå
%Finis.
apl> '6Ox' graph 3,1,1,r,8 ,-4,4,1 ,1 , 1 ,1 " coshdatx.tex
%Label the curve
Öput( 1.028571 , 16.35825 )änÖ#1å
%Draw the data points
Öput( 1.092857 , 16.05367 )äÖcircle*ä .05857143åå
Öput( 1.157143 , 15.76107 )äÖcircle*ä .05857143åå
Öput( 1.221429 , 15.47997 )äÖcircle*ä .05857143åå
Öput( 1.285714 , 15.20993 )äÖcircle*ä .05857143åå
Öput( 1.35 , 14.95051 )äÖcircle*ä .05857143åå
Öput( 1.414286 , 14.7013 )äÖcircle*ä .05857143åå
Öput( 1.478571 , 14.4619 )äÖcircle*ä .05857143åå
Öput( 1.542857 , 14.23193 )äÖcircle*ä .05857143åå
Öput( 1.607143 , 14.01101 )äÖcircle*ä .05857143åå
Öput( 1.671429 , 13.79880 )äÖcircle*ä .05857143åå
Öput( 1.735714 , 13.59495 )äÖcircle*ä .05857143åå
Öput( 1.8 , 13.39914 )äÖcircle*ä .05857143åå
Öput( 1.864286 , 13.21106 )äÖcircle*ä .05857143åå
Öput( 1.928571 , 13.03040 )äÖcircle*ä .05857143åå
Öput( 1.992857 , 12.85687 )äÖcircle*ä .05857143åå
Öput( 2.057143 , 12.6902 )äÖcircle*ä .05857143åå
Öput( 2.121429 , 12.53013 )äÖcircle*ä .05857143åå
Öput( 2.185714 , 12.37639 )äÖcircle*ä .05857143åå
Öput( 2.25 , 12.22874 )äÖcircle*ä .05857143åå
Öput( 2.314286 , 12.08694 )äÖcircle*ä .05857143åå
Öput( 2.378571 , 11.95076 )äÖcircle*ä .05857143åå
Öput( 2.442857 , 11.82000 )äÖcircle*ä .05857143åå
Öput( 2.507143 , 11.69443 )äÖcircle*ä .05857143åå
Öput( 2.571429 , 11.57386 )äÖcircle*ä .05857143åå
Öput( 2.635714 , 11.45809 )äÖcircle*ä .05857143åå
Öput( 2.7 , 11.34695 )äÖcircle*ä .05857143åå
Öput( 2.764286 , 11.24024 )äÖcircle*ä .05857143åå
Öput( 2.828571 , 11.1378 )äÖcircle*ä .05857143åå
Öput( 2.892857 , 11.03948 )äÖcircle*ä .05857143åå
Öput( 2.957143 , 10.9451 )äÖcircle*ä .05857143åå
Öput( 3.021429 , 10.85452 )äÖcircle*ä .05857143åå
Öput( 3.085714 , 10.76760 )äÖcircle*ä .05857143åå
Öput( 3.15 , 10.68418 )äÖcircle*ä .05857143åå
Öput( 3.214286 , 10.60415 )äÖcircle*ä .05857143åå
Öput( 3.278571 , 10.52737 )äÖcircle*ä .05857143åå
Öput( 3.342857 , 10.45372 )äÖcircle*ä .05857143åå
Öput( 3.407143 , 10.38309 )äÖcircle*ä .05857143åå
Öput( 3.471429 , 10.31535 )äÖcircle*ä .05857143åå
Öput( 3.535714 , 10.2504 )äÖcircle*ä .05857143åå
Öput( 3.6 , 10.18814 )äÖcircle*ä .05857143åå
Öput( 3.664286 , 10.12847 )äÖcircle*ä .05857143åå
Öput( 3.728571 , 10.07129 )äÖcircle*ä .05857143åå
Öput( 3.792857 , 10.0165 )äÖcircle*ä .05857143åå
Öput( 3.857143 , 9.96404 )äÖcircle*ä .05857143åå
Öput( 3.921429 , 9.91380 )äÖcircle*ä .05857143åå
Öput( 3.985714 , 9.8657 )äÖcircle*ä .05857143åå
Öput( 4.05 , 9.81968 )äÖcircle*ä .05857143åå
Öput( 4.114286 , 9.77566 )äÖcircle*ä .05857143åå
Öput( 4.178571 , 9.73356 )äÖcircle*ä .05857143åå
Öput( 4.242857 , 9.69333 )äÖcircle*ä .05857143åå
Öput( 4.307143 , 9.65489 )äÖcircle*ä .05857143åå
Öput( 4.371429 , 9.61818 )äÖcircle*ä .05857143åå
Öput( 4.435714 , 9.58314 )äÖcircle*ä .05857143åå
Öput( 4.5 , 9.54973 )äÖcircle*ä .05857143åå
Öput( 4.564286 , 9.51788 )äÖcircle*ä .05857143åå
Öput( 4.628571 , 9.487547 )äÖcircle*ä .05857143åå
Öput( 4.692857 , 9.458679 )äÖcircle*ä .05857143åå
Öput( 4.757143 , 9.431231 )äÖcircle*ä .05857143åå
Öput( 4.821429 , 9.405159 )äÖcircle*ä .05857143åå
Öput( 4.885714 , 9.38042 )äÖcircle*ä .05857143åå
Öput( 4.95 , 9.356977 )äÖcircle*ä .05857143åå
Öput( 5.014286 , 9.33479 )äÖcircle*ä .05857143åå
Öput( 5.078571 , 9.313825 )äÖcircle*ä .05857143åå
Öput( 5.142857 , 9.294048 )äÖcircle*ä .05857143åå
Öput( 5.207143 , 9.275427 )äÖcircle*ä .05857143åå
Öput( 5.271429 , 9.257933 )äÖcircle*ä .05857143åå
Öput( 5.335714 , 9.241537 )äÖcircle*ä .05857143åå
Öput( 5.4 , 9.226214 )äÖcircle*ä .05857143åå
Öput( 5.464286 , 9.211938 )äÖcircle*ä .05857143åå
Öput( 5.528571 , 9.198688 )äÖcircle*ä .05857143åå
Öput( 5.592857 , 9.18644 )äÖcircle*ä .05857143åå
Öput( 5.657143 , 9.175178 )äÖcircle*ä .05857143åå
Öput( 5.721429 , 9.164881 )äÖcircle*ä .05857143åå
Öput( 5.785714 , 9.155534 )äÖcircle*ä .05857143åå
Öput( 5.85 , 9.147122 )äÖcircle*ä .05857143åå
Öput( 5.914286 , 9.139631 )äÖcircle*ä .05857143åå
Öput( 5.978571 , 9.133049 )äÖcircle*ä .05857143åå
Öput( 6.042857 , 9.127366 )äÖcircle*ä .05857143åå
Öput( 6.107143 , 9.122573 )äÖcircle*ä .05857143åå
Öput( 6.171429 , 9.118662 )äÖcircle*ä .05857143åå
Öput( 6.235714 , 9.115626 )äÖcircle*ä .05857143åå
Öput( 6.3 , 9.11346 )äÖcircle*ä .05857143åå
Öput( 6.364286 , 9.112163 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 9.11173 )äÖcircle*ä .05857143åå
Öput( 6.492857 , 9.112163 )äÖcircle*ä .05857143åå
Öput( 6.557143 , 9.11346 )äÖcircle*ä .05857143åå
Öput( 6.621429 , 9.115626 )äÖcircle*ä .05857143åå
Öput( 6.685714 , 9.118662 )äÖcircle*ä .05857143åå
Öput( 6.75 , 9.122573 )äÖcircle*ä .05857143åå
Öput( 6.814286 , 9.127366 )äÖcircle*ä .05857143åå
Öput( 6.878571 , 9.133049 )äÖcircle*ä .05857143åå
Öput( 6.942857 , 9.139631 )äÖcircle*ä .05857143åå
Öput( 7.007143 , 9.147122 )äÖcircle*ä .05857143åå
Öput( 7.071429 , 9.155534 )äÖcircle*ä .05857143åå
Öput( 7.135714 , 9.164881 )äÖcircle*ä .05857143åå
Öput( 7.2 , 9.175178 )äÖcircle*ä .05857143åå
Öput( 7.264286 , 9.18644 )äÖcircle*ä .05857143åå
Öput( 7.328571 , 9.198688 )äÖcircle*ä .05857143åå
Öput( 7.392857 , 9.211938 )äÖcircle*ä .05857143åå
Öput( 7.457143 , 9.226214 )äÖcircle*ä .05857143åå
Öput( 7.521429 , 9.241537 )äÖcircle*ä .05857143åå
Öput( 7.585714 , 9.257933 )äÖcircle*ä .05857143åå
Öput( 7.65 , 9.275427 )äÖcircle*ä .05857143åå
Öput( 7.714286 , 9.294048 )äÖcircle*ä .05857143åå
Öput( 7.778571 , 9.313825 )äÖcircle*ä .05857143åå
Öput( 7.842857 , 9.33479 )äÖcircle*ä .05857143åå
Öput( 7.907143 , 9.356977 )äÖcircle*ä .05857143åå
Öput( 7.971429 , 9.38042 )äÖcircle*ä .05857143åå
Öput( 8.035714 , 9.405159 )äÖcircle*ä .05857143åå
Öput( 8.1 , 9.431231 )äÖcircle*ä .05857143åå
Öput( 8.164286 , 9.458679 )äÖcircle*ä .05857143åå
Öput( 8.228571 , 9.487547 )äÖcircle*ä .05857143åå
Öput( 8.292857 , 9.51788 )äÖcircle*ä .05857143åå
Öput( 8.357143 , 9.54973 )äÖcircle*ä .05857143åå
Öput( 8.421429 , 9.58314 )äÖcircle*ä .05857143åå
Öput( 8.485714 , 9.61818 )äÖcircle*ä .05857143åå
Öput( 8.55 , 9.65489 )äÖcircle*ä .05857143åå
Öput( 8.614286 , 9.69333 )äÖcircle*ä .05857143åå
Öput( 8.678571 , 9.73356 )äÖcircle*ä .05857143åå
Öput( 8.742857 , 9.77566 )äÖcircle*ä .05857143åå
Öput( 8.807143 , 9.81968 )äÖcircle*ä .05857143åå
Öput( 8.871429 , 9.8657 )äÖcircle*ä .05857143åå
Öput( 8.935714 , 9.91380 )äÖcircle*ä .05857143åå
Öput( 9 , 9.96404 )äÖcircle*ä .05857143åå
Öput( 9.064286 , 10.0165 )äÖcircle*ä .05857143åå
Öput( 9.128571 , 10.07129 )äÖcircle*ä .05857143åå
Öput( 9.192857 , 10.12847 )äÖcircle*ä .05857143åå
Öput( 9.257143 , 10.18814 )äÖcircle*ä .05857143åå
Öput( 9.321429 , 10.2504 )äÖcircle*ä .05857143åå
Öput( 9.385714 , 10.31535 )äÖcircle*ä .05857143åå
Öput( 9.45 , 10.38309 )äÖcircle*ä .05857143åå
Öput( 9.51429 , 10.45372 )äÖcircle*ä .05857143åå
Öput( 9.57857 , 10.52737 )äÖcircle*ä .05857143åå
Öput( 9.64286 , 10.60415 )äÖcircle*ä .05857143åå
Öput( 9.70714 , 10.68418 )äÖcircle*ä .05857143åå
Öput( 9.77143 , 10.76760 )äÖcircle*ä .05857143åå
Öput( 9.83571 , 10.85452 )äÖcircle*ä .05857143åå
Öput( 9.9 , 10.9451 )äÖcircle*ä .05857143åå
Öput( 9.96429 , 11.03948 )äÖcircle*ä .05857143åå
Öput( 10.02857 , 11.1378 )äÖcircle*ä .05857143åå
Öput( 10.09286 , 11.24024 )äÖcircle*ä .05857143åå
Öput( 10.15714 , 11.34695 )äÖcircle*ä .05857143åå
Öput( 10.22143 , 11.45809 )äÖcircle*ä .05857143åå
Öput( 10.28571 , 11.57386 )äÖcircle*ä .05857143åå
Öput( 10.35 , 11.69443 )äÖcircle*ä .05857143åå
Öput( 10.41429 , 11.82000 )äÖcircle*ä .05857143åå
Öput( 10.47857 , 11.95076 )äÖcircle*ä .05857143åå
Öput( 10.54286 , 12.08694 )äÖcircle*ä .05857143åå
Öput( 10.60714 , 12.22874 )äÖcircle*ä .05857143åå
Öput( 10.67143 , 12.37639 )äÖcircle*ä .05857143åå
Öput( 10.73571 , 12.53013 )äÖcircle*ä .05857143åå
Öput( 10.8 , 12.6902 )äÖcircle*ä .05857143åå
Öput( 10.86429 , 12.85687 )äÖcircle*ä .05857143åå
Öput( 10.92857 , 13.03040 )äÖcircle*ä .05857143åå
Öput( 10.99286 , 13.21106 )äÖcircle*ä .05857143åå
Öput( 11.05714 , 13.39914 )äÖcircle*ä .05857143åå
Öput( 11.12143 , 13.59495 )äÖcircle*ä .05857143åå
Öput( 11.18571 , 13.79880 )äÖcircle*ä .05857143åå
Öput( 11.25 , 14.01101 )äÖcircle*ä .05857143åå
Öput( 11.31429 , 14.23193 )äÖcircle*ä .05857143åå
Öput( 11.37857 , 14.4619 )äÖcircle*ä .05857143åå
Öput( 11.44286 , 14.7013 )äÖcircle*ä .05857143åå
Öput( 11.50714 , 14.95051 )äÖcircle*ä .05857143åå
Öput( 11.57143 , 15.20993 )äÖcircle*ä .05857143åå
Öput( 11.63571 , 15.47997 )äÖcircle*ä .05857143åå
Öput( 11.7 , 15.76107 )äÖcircle*ä .05857143åå
Öput( 11.76429 , 16.05367 )äÖcircle*ä .05857143åå
%Finis.
apl> '6Ox' graph 2,1,1,r,8 ,-4,4,1 ,2 , 1 ,1 " coshdatx.tex
%Label the curve
Öput( .578571 , .24006748 )änÖ#2å
%Draw the data points
Öput( .642857 , .950623 )äÖcircle*ä .05857143åå
Öput( .707143 , 1.248985 )äÖcircle*ä .05857143åå
Öput( .771429 , 1.535628 )äÖcircle*ä .05857143åå
Öput( .835714 , 1.811013 )äÖcircle*ä .05857143åå
Öput( .9 , 2.075580 )äÖcircle*ä .05857143åå
Öput( .964286 , 2.329752 )äÖcircle*ä .05857143åå
Öput( 1.028571 , 2.573936 )äÖcircle*ä .05857143åå
Öput( 1.092857 , 2.808522 )äÖcircle*ä .05857143åå
Öput( 1.157143 , 3.033887 )äÖcircle*ä .05857143åå
Öput( 1.221429 , 3.25039 )äÖcircle*ä .05857143åå
Öput( 1.285714 , 3.458380 )äÖcircle*ä .05857143åå
Öput( 1.35 , 3.658186 )äÖcircle*ä .05857143åå
Öput( 1.414286 , 3.850131 )äÖcircle*ä .05857143åå
Öput( 1.478571 , 4.03452 )äÖcircle*ä .05857143åå
Öput( 1.542857 , 4.21165 )äÖcircle*ä .05857143åå
Öput( 1.607143 , 4.381803 )äÖcircle*ä .05857143åå
Öput( 1.671429 , 4.545251 )äÖcircle*ä .05857143åå
Öput( 1.735714 , 4.702257 )äÖcircle*ä .05857143åå
Öput( 1.8 , 4.853072 )äÖcircle*ä .05857143åå
Öput( 1.864286 , 4.997936 )äÖcircle*ä .05857143åå
Öput( 1.928571 , 5.137082 )äÖcircle*ä .05857143åå
Öput( 1.992857 , 5.270732 )äÖcircle*ä .05857143åå
Öput( 2.057143 , 5.3991 )äÖcircle*ä .05857143åå
Öput( 2.121429 , 5.522392 )äÖcircle*ä .05857143åå
Öput( 2.185714 , 5.640805 )äÖcircle*ä .05857143åå
Öput( 2.25 , 5.754528 )äÖcircle*ä .05857143åå
Öput( 2.314286 , 5.863744 )äÖcircle*ä .05857143åå
Öput( 2.378571 , 5.968626 )äÖcircle*ä .05857143åå
Öput( 2.442857 , 6.069344 )äÖcircle*ä .05857143åå
Öput( 2.507143 , 6.166058 )äÖcircle*ä .05857143åå
Öput( 2.571429 , 6.258923 )äÖcircle*ä .05857143åå
Öput( 2.635714 , 6.348087 )äÖcircle*ä .05857143åå
Öput( 2.7 , 6.433693 )äÖcircle*ä .05857143åå
Öput( 2.764286 , 6.515879 )äÖcircle*ä .05857143åå
Öput( 2.828571 , 6.594775 )äÖcircle*ä .05857143åå
Öput( 2.892857 , 6.670508 )äÖcircle*ä .05857143åå
Öput( 2.957143 , 6.743199 )äÖcircle*ä .05857143åå
Öput( 3.021429 , 6.812965 )äÖcircle*ä .05857143åå
Öput( 3.085714 , 6.879917 )äÖcircle*ä .05857143åå
Öput( 3.15 , 6.944162 )äÖcircle*ä .05857143åå
Öput( 3.214286 , 7.005803 )äÖcircle*ä .05857143åå
Öput( 3.278571 , 7.064938 )äÖcircle*ä .05857143åå
Öput( 3.342857 , 7.121663 )äÖcircle*ä .05857143åå
Öput( 3.407143 , 7.176068 )äÖcircle*ä .05857143åå
Öput( 3.471429 , 7.22824 )äÖcircle*ä .05857143åå
Öput( 3.535714 , 7.278263 )äÖcircle*ä .05857143åå
Öput( 3.6 , 7.326217 )äÖcircle*ä .05857143åå
Öput( 3.664286 , 7.372178 )äÖcircle*ä .05857143åå
Öput( 3.728571 , 7.416220 )äÖcircle*ä .05857143åå
Öput( 3.792857 , 7.458413 )äÖcircle*ä .05857143åå
Öput( 3.857143 , 7.498825 )äÖcircle*ä .05857143åå
Öput( 3.921429 , 7.53752 )äÖcircle*ä .05857143åå
Öput( 3.985714 , 7.574562 )äÖcircle*ä .05857143åå
Öput( 4.05 , 7.610008 )äÖcircle*ä .05857143åå
Öput( 4.114286 , 7.643916 )äÖcircle*ä .05857143åå
Öput( 4.178571 , 7.676339 )äÖcircle*ä .05857143åå
Öput( 4.242857 , 7.70733 )äÖcircle*ä .05857143åå
Öput( 4.307143 , 7.736938 )äÖcircle*ä .05857143åå
Öput( 4.371429 , 7.765211 )äÖcircle*ä .05857143åå
Öput( 4.435714 , 7.792194 )äÖcircle*ä .05857143åå
Öput( 4.5 , 7.81793 )äÖcircle*ä .05857143åå
Öput( 4.564286 , 7.84246 )äÖcircle*ä .05857143åå
Öput( 4.628571 , 7.865824 )äÖcircle*ä .05857143åå
Öput( 4.692857 , 7.888058 )äÖcircle*ä .05857143åå
Öput( 4.757143 , 7.909199 )äÖcircle*ä .05857143åå
Öput( 4.821429 , 7.92928 )äÖcircle*ä .05857143åå
Öput( 4.885714 , 7.948334 )äÖcircle*ä .05857143åå
Öput( 4.95 , 7.96639 )äÖcircle*ä .05857143åå
Öput( 5.014286 , 7.983479 )äÖcircle*ä .05857143åå
Öput( 5.078571 , 7.999627 )äÖcircle*ä .05857143åå
Öput( 5.142857 , 8.014859 )äÖcircle*ä .05857143åå
Öput( 5.207143 , 8.029201 )äÖcircle*ä .05857143åå
Öput( 5.271429 , 8.042675 )äÖcircle*ä .05857143åå
Öput( 5.335714 , 8.055304 )äÖcircle*ä .05857143åå
Öput( 5.4 , 8.067106 )äÖcircle*ä .05857143åå
Öput( 5.464286 , 8.078101 )äÖcircle*ä .05857143åå
Öput( 5.528571 , 8.088307 )äÖcircle*ä .05857143åå
Öput( 5.592857 , 8.097739 )äÖcircle*ä .05857143åå
Öput( 5.657143 , 8.106414 )äÖcircle*ä .05857143åå
Öput( 5.721429 , 8.114345 )äÖcircle*ä .05857143åå
Öput( 5.785714 , 8.121544 )äÖcircle*ä .05857143åå
Öput( 5.85 , 8.128023 )äÖcircle*ä .05857143åå
Öput( 5.914286 , 8.133793 )äÖcircle*ä .05857143åå
Öput( 5.978571 , 8.138862 )äÖcircle*ä .05857143åå
Öput( 6.042857 , 8.143239 )äÖcircle*ä .05857143åå
Öput( 6.107143 , 8.146931 )äÖcircle*ä .05857143åå
Öput( 6.171429 , 8.149944 )äÖcircle*ä .05857143åå
Öput( 6.235714 , 8.152282 )äÖcircle*ä .05857143åå
Öput( 6.3 , 8.153949 )äÖcircle*ä .05857143åå
Öput( 6.364286 , 8.154949 )äÖcircle*ä .05857143åå
Öput( 6.428571 , 8.155282 )äÖcircle*ä .05857143åå
Öput( 6.492857 , 8.154949 )äÖcircle*ä .05857143åå
Öput( 6.557143 , 8.153949 )äÖcircle*ä .05857143åå
Öput( 6.621429 , 8.152282 )äÖcircle*ä .05857143åå
Öput( 6.685714 , 8.149944 )äÖcircle*ä .05857143åå
Öput( 6.75 , 8.146931 )äÖcircle*ä .05857143åå
Öput( 6.814286 , 8.143239 )äÖcircle*ä .05857143åå
Öput( 6.878571 , 8.138862 )äÖcircle*ä .05857143åå
Öput( 6.942857 , 8.133793 )äÖcircle*ä .05857143åå
Öput( 7.007143 , 8.128023 )äÖcircle*ä .05857143åå
Öput( 7.071429 , 8.121544 )äÖcircle*ä .05857143åå
Öput( 7.135714 , 8.114345 )äÖcircle*ä .05857143åå
Öput( 7.2 , 8.106414 )äÖcircle*ä .05857143åå
Öput( 7.264286 , 8.097739 )äÖcircle*ä .05857143åå
Öput( 7.328571 , 8.088307 )äÖcircle*ä .05857143åå
Öput( 7.392857 , 8.078101 )äÖcircle*ä .05857143åå
Öput( 7.457143 , 8.067106 )äÖcircle*ä .05857143åå
Öput( 7.521429 , 8.055304 )äÖcircle*ä .05857143åå
Öput( 7.585714 , 8.042675 )äÖcircle*ä .05857143åå
Öput( 7.65 , 8.029201 )äÖcircle*ä .05857143åå
Öput( 7.714286 , 8.014859 )äÖcircle*ä .05857143åå
Öput( 7.778571 , 7.999627 )äÖcircle*ä .05857143åå
Öput( 7.842857 , 7.983479 )äÖcircle*ä .05857143åå
Öput( 7.907143 , 7.96639 )äÖcircle*ä .05857143åå
Öput( 7.971429 , 7.948334 )äÖcircle*ä .05857143åå
Öput( 8.035714 , 7.92928 )äÖcircle*ä .05857143åå
Öput( 8.1 , 7.909199 )äÖcircle*ä .05857143åå
Öput( 8.164286 , 7.888058 )äÖcircle*ä .05857143åå
Öput( 8.228571 , 7.865824 )äÖcircle*ä .05857143åå
Öput( 8.292857 , 7.84246 )äÖcircle*ä .05857143åå
Öput( 8.357143 , 7.81793 )äÖcircle*ä .05857143åå
Öput( 8.421429 , 7.792194 )äÖcircle*ä .05857143åå
Öput( 8.485714 , 7.765211 )äÖcircle*ä .05857143åå
Öput( 8.55 , 7.736938 )äÖcircle*ä .05857143åå
Öput( 8.614286 , 7.70733 )äÖcircle*ä .05857143åå
Öput( 8.678571 , 7.676339 )äÖcircle*ä .05857143åå
Öput( 8.742857 , 7.643916 )äÖcircle*ä .05857143åå
Öput( 8.807143 , 7.610008 )äÖcircle*ä .05857143åå
Öput( 8.871429 , 7.574562 )äÖcircle*ä .05857143åå
Öput( 8.935714 , 7.53752 )äÖcircle*ä .05857143åå
Öput( 9 , 7.498825 )äÖcircle*ä .05857143åå
Öput( 9.064286 , 7.458413 )äÖcircle*ä .05857143åå
Öput( 9.128571 , 7.416220 )äÖcircle*ä .05857143åå
Öput( 9.192857 , 7.372178 )äÖcircle*ä .05857143åå
Öput( 9.257143 , 7.326217 )äÖcircle*ä .05857143åå
Öput( 9.321429 , 7.278263 )äÖcircle*ä .05857143åå
Öput( 9.385714 , 7.22824 )äÖcircle*ä .05857143åå
Öput( 9.45 , 7.176068 )äÖcircle*ä .05857143åå
Öput( 9.51429 , 7.121663 )äÖcircle*ä .05857143åå
Öput( 9.57857 , 7.064938 )äÖcircle*ä .05857143åå
Öput( 9.64286 , 7.005803 )äÖcircle*ä .05857143åå
Öput( 9.70714 , 6.944162 )äÖcircle*ä .05857143åå
Öput( 9.77143 , 6.879917 )äÖcircle*ä .05857143åå
Öput( 9.83571 , 6.812965 )äÖcircle*ä .05857143åå
Öput( 9.9 , 6.743199 )äÖcircle*ä .05857143åå
Öput( 9.96429 , 6.670508 )äÖcircle*ä .05857143åå
Öput( 10.02857 , 6.594775 )äÖcircle*ä .05857143åå
Öput( 10.09286 , 6.515879 )äÖcircle*ä .05857143åå
Öput( 10.15714 , 6.433693 )äÖcircle*ä .05857143åå
Öput( 10.22143 , 6.348087 )äÖcircle*ä .05857143åå
Öput( 10.28571 , 6.258923 )äÖcircle*ä .05857143åå
Öput( 10.35 , 6.166058 )äÖcircle*ä .05857143åå
Öput( 10.41429 , 6.069344 )äÖcircle*ä .05857143åå
Öput( 10.47857 , 5.968626 )äÖcircle*ä .05857143åå
Öput( 10.54286 , 5.863744 )äÖcircle*ä .05857143åå
Öput( 10.60714 , 5.754528 )äÖcircle*ä .05857143åå
Öput( 10.67143 , 5.640805 )äÖcircle*ä .05857143åå
Öput( 10.73571 , 5.522392 )äÖcircle*ä .05857143åå
Öput( 10.8 , 5.3991 )äÖcircle*ä .05857143åå
Öput( 10.86429 , 5.270732 )äÖcircle*ä .05857143åå
Öput( 10.92857 , 5.137082 )äÖcircle*ä .05857143åå
Öput( 10.99286 , 4.997936 )äÖcircle*ä .05857143åå
Öput( 11.05714 , 4.853072 )äÖcircle*ä .05857143åå
Öput( 11.12143 , 4.702257 )äÖcircle*ä .05857143åå
Öput( 11.18571 , 4.545251 )äÖcircle*ä .05857143åå
Öput( 11.25 , 4.381803 )äÖcircle*ä .05857143åå
Öput( 11.31429 , 4.21165 )äÖcircle*ä .05857143åå
Öput( 11.37857 , 4.03452 )äÖcircle*ä .05857143åå
Öput( 11.44286 , 3.850131 )äÖcircle*ä .05857143åå
Öput( 11.50714 , 3.658186 )äÖcircle*ä .05857143åå
Öput( 11.57143 , 3.458380 )äÖcircle*ä .05857143åå
Öput( 11.63571 , 3.25039 )äÖcircle*ä .05857143åå
Öput( 11.7 , 3.033887 )äÖcircle*ä .05857143åå
Öput( 11.76429 , 2.808522 )äÖcircle*ä .05857143åå
Öput( 11.82857 , 2.573936 )äÖcircle*ä .05857143åå
Öput( 11.89286 , 2.329752 )äÖcircle*ä .05857143åå
Öput( 11.95714 , 2.075580 )äÖcircle*ä .05857143åå
Öput( 12.02143 , 1.811013 )äÖcircle*ä .05857143åå
Öput( 12.08571 , 1.535628 )äÖcircle*ä .05857143åå
Öput( 12.15 , 1.248985 )äÖcircle*ä .05857143åå
Öput( 12.21429 , .950623 )äÖcircle*ä .05857143åå
Öendäpictureå
Öendäcenterå
%Finis.
apl>)off
