|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T s
Length: 16838 (0x41c6) Types: TextFile Names: »spline.ps«
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89 └─⟦148e64aa4⟧ »./plot2ps.tar.Z« └─⟦ff7617d1d⟧ └─⟦this⟧ »spline.ps«
%!PS-Adobe-2.0 EPSF-1.2 %% %% %% TYPE `plot2ps -help' FOR MORE INFORMATION. %% %% %%DocumentFonts: Times-Bold %%BoundingBox: 0 0 750 750 %%EndComments 50 dict begin /arrowHeight 8 def /arrowWidth 4 def /none null def /numGraphicParameters 17 def /stringLimit 65535 def /Begin { save numGraphicParameters dict begin } def /End { end restore } def /SetB { dup type /nulltype eq { pop false /brushRightArrow idef false /brushLeftArrow idef true /brushNone idef } { /brushDashOffset idef /brushDashArray idef 0 ne /brushRightArrow idef 0 ne /brushLeftArrow idef /brushWidth idef false /brushNone idef } ifelse } def /SetCFg { /fgblue idef /fggreen idef /fgred idef } def /SetCBg { /bgblue idef /bggreen idef /bgred idef } def /SetF { /printSize idef /printFont idef } def /SetP { dup type /nulltype eq { pop true /patternNone idef } { /patternGrayLevel idef patternGrayLevel -1 eq { /patternString idef } if false /patternNone idef } ifelse } def /BSpl { 0 begin storexyn newpath n 1 gt { 0 0 0 0 0 0 1 1 true subspline n 2 gt { 0 0 0 0 1 1 2 2 false subspline 1 1 n 3 sub { /i exch def i 1 sub dup i dup i 1 add dup i 2 add dup false subspline } for n 3 sub dup n 2 sub dup n 1 sub dup 2 copy false subspline } if n 2 sub dup n 1 sub dup 2 copy 2 copy false subspline patternNone not brushLeftArrow not brushRightArrow not and and { ifill } if brushNone not { istroke } if 0 0 1 1 leftarrow n 2 sub dup n 1 sub dup rightarrow } if end } dup 0 4 dict put def /Circ { newpath 0 360 arc patternNone not { ifill } if brushNone not { istroke } if } def /CBSpl { 0 begin dup 2 gt { storexyn newpath n 1 sub dup 0 0 1 1 2 2 true subspline 1 1 n 3 sub { /i exch def i 1 sub dup i dup i 1 add dup i 2 add dup false subspline } for n 3 sub dup n 2 sub dup n 1 sub dup 0 0 false subspline n 2 sub dup n 1 sub dup 0 0 1 1 false subspline patternNone not { ifill } if brushNone not { istroke } if } { Poly } ifelse end } dup 0 4 dict put def /Elli { 0 begin newpath 4 2 roll translate scale 0 0 1 0 360 arc patternNone not { ifill } if brushNone not { istroke } if end } dup 0 1 dict put def /Line { 0 begin 2 storexyn newpath x 0 get y 0 get moveto x 1 get y 1 get lineto brushNone not { istroke } if 0 0 1 1 leftarrow 0 0 1 1 rightarrow end } dup 0 4 dict put def /MLine { 0 begin storexyn newpath n 1 gt { x 0 get y 0 get moveto 1 1 n 1 sub { /i exch def x i get y i get lineto } for patternNone not brushLeftArrow not brushRightArrow not and and { ifill } if brushNone not { istroke } if 0 0 1 1 leftarrow n 2 sub dup n 1 sub dup rightarrow } if end } dup 0 4 dict put def /Poly { 3 1 roll newpath moveto -1 add { lineto } repeat closepath patternNone not { ifill } if brushNone not { istroke } if } def /Rect { 0 begin /t exch def /r exch def /b exch def /l exch def newpath l b moveto l t lineto r t lineto r b lineto closepath patternNone not { ifill } if brushNone not { istroke } if end } dup 0 4 dict put def /Text { ishow } def /idef { dup where { pop pop pop } { exch def } ifelse } def /ifill { 0 begin gsave patternGrayLevel -1 ne { fgred bgred fgred sub patternGrayLevel mul add fggreen bggreen fggreen sub patternGrayLevel mul add fgblue bgblue fgblue sub patternGrayLevel mul add setrgbcolor eofill } { eoclip originalCTM setmatrix pathbbox /t exch def /r exch def /b exch def /l exch def /w r l sub ceiling cvi def /h t b sub ceiling cvi def /imageByteWidth w 8 div ceiling cvi def /imageHeight h def bgred bggreen bgblue setrgbcolor eofill fgred fggreen fgblue setrgbcolor w 0 gt h 0 gt and { l b translate w h scale w h true [w 0 0 h neg 0 h] { patternproc } imagemask } if } ifelse grestore end } dup 0 8 dict put def /istroke { gsave brushDashOffset -1 eq { [] 0 setdash 1 setgray } { brushDashArray brushDashOffset setdash fgred fggreen fgblue setrgbcolor } ifelse brushWidth setlinewidth originalCTM setmatrix stroke grestore } def /ishow { 0 begin gsave printFont findfont printSize scalefont setfont fgred fggreen fgblue setrgbcolor /vertoffset printSize neg def { 0 vertoffset moveto show /vertoffset vertoffset printSize sub def } forall grestore end } dup 0 3 dict put def /patternproc { 0 begin /patternByteLength patternString length def /patternHeight patternByteLength 8 mul sqrt cvi def /patternWidth patternHeight def /patternByteWidth patternWidth 8 idiv def /imageByteMaxLength imageByteWidth imageHeight mul stringLimit patternByteWidth sub min def /imageMaxHeight imageByteMaxLength imageByteWidth idiv patternHeight idiv patternHeight mul patternHeight max def /imageHeight imageHeight imageMaxHeight sub store /imageString imageByteWidth imageMaxHeight mul patternByteWidth add string def 0 1 imageMaxHeight 1 sub { /y exch def /patternRow y patternByteWidth mul patternByteLength mod def /patternRowString patternString patternRow patternByteWidth getinterval def /imageRow y imageByteWidth mul def 0 patternByteWidth imageByteWidth 1 sub { /x exch def imageString imageRow x add patternRowString putinterval } for } for imageString end } dup 0 12 dict put def /min { dup 3 2 roll dup 4 3 roll lt { exch } if pop } def /max { dup 3 2 roll dup 4 3 roll gt { exch } if pop } def /arrowhead { 0 begin transform originalCTM itransform /taily exch def /tailx exch def transform originalCTM itransform /tipy exch def /tipx exch def /dy tipy taily sub def /dx tipx tailx sub def /angle dx 0 ne dy 0 ne or { dy dx atan } { 90 } ifelse def gsave originalCTM setmatrix tipx tipy translate angle rotate newpath 0 0 moveto arrowHeight neg arrowWidth 2 div lineto arrowHeight neg arrowWidth 2 div neg lineto closepath patternNone not { originalCTM setmatrix /padtip arrowHeight 2 exp 0.25 arrowWidth 2 exp mul add sqrt brushWidth mul arrowWidth div def /padtail brushWidth 2 div def tipx tipy translate angle rotate padtip 0 translate arrowHeight padtip add padtail add arrowHeight div dup scale arrowheadpath ifill } if brushNone not { originalCTM setmatrix tipx tipy translate angle rotate arrowheadpath istroke } if grestore end } dup 0 9 dict put def /arrowheadpath { newpath 0 0 moveto arrowHeight neg arrowWidth 2 div lineto arrowHeight neg arrowWidth 2 div neg lineto closepath } def /leftarrow { 0 begin y exch get /taily exch def x exch get /tailx exch def y exch get /tipy exch def x exch get /tipx exch def brushLeftArrow { tipx tipy tailx taily arrowhead } if end } dup 0 4 dict put def /rightarrow { 0 begin y exch get /tipy exch def x exch get /tipx exch def y exch get /taily exch def x exch get /tailx exch def brushRightArrow { tipx tipy tailx taily arrowhead } if end } dup 0 4 dict put def /midpoint { 0 begin /y1 exch def /x1 exch def /y0 exch def /x0 exch def x0 x1 add 2 div y0 y1 add 2 div end } dup 0 4 dict put def /thirdpoint { 0 begin /y1 exch def /x1 exch def /y0 exch def /x0 exch def x0 2 mul x1 add 3 div y0 2 mul y1 add 3 div end } dup 0 4 dict put def /subspline { 0 begin /movetoNeeded exch def y exch get /y3 exch def x exch get /x3 exch def y exch get /y2 exch def x exch get /x2 exch def y exch get /y1 exch def x exch get /x1 exch def y exch get /y0 exch def x exch get /x0 exch def x1 y1 x2 y2 thirdpoint /p1y exch def /p1x exch def x2 y2 x1 y1 thirdpoint /p2y exch def /p2x exch def x1 y1 x0 y0 thirdpoint p1x p1y midpoint /p0y exch def /p0x exch def x2 y2 x3 y3 thirdpoint p2x p2y midpoint /p3y exch def /p3x exch def movetoNeeded { p0x p0y moveto } if p1x p1y p2x p2y p3x p3y curveto end } dup 0 17 dict put def /storexyn { /n exch def /y n array def /x n array def n 1 sub -1 0 { /i exch def y i 3 2 roll put x i 3 2 roll put } for } def %%EndProlog %I Idraw 4 Begin %I b u %I cfg u %I cbg u %I f u %I p u %I t [ 0.800000 0 0 0.800000 0 0 ] concat /originalCTM matrix currentmatrix def % % % % TYPE `plot2ps -help' FOR MORE INFORMATION. % % Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 5 400 400 3900 400 3900 3900 400 3900 400 400 5 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 400 400 360 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 3940 400 3900 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 1275 400 1275 3900 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 1275 400 1275 360 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 1275 3940 1275 3900 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 2150 400 2150 3900 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 2150 400 2150 360 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 2150 3940 2150 3900 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3025 400 3025 3900 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3025 400 3025 360 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3025 3940 3025 3900 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3900 400 3900 360 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3900 3940 3900 3900 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 400 360 400 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3940 400 3900 400 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 1100 3900 1100 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 1100 360 1100 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3940 1100 3900 1100 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 1800 3900 1800 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 1800 360 1800 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3940 1800 3900 1800 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 2500 3900 2500 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 2500 360 2500 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3940 2500 3900 2500 2 MLine End Begin %I MLine %I b 3 0 0 0 [ 2 14 ] 17 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 3200 3900 3200 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 3200 360 3200 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3940 3200 3900 3200 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 400 3900 360 3900 2 MLine End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 2 3940 3900 3900 3900 2 MLine End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 69.742188 66.402441 ] concat %I [ (0) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 224.709473 66.402441 ] concat %I [ (0.5) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 390.176758 66.402441 ] concat %I [ (1) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 545.144043 66.402441 ] concat %I [ (1.5) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 710.611328 66.402441 ] concat %I [ (2) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 58.002441 82.342187 ] concat %I [ (0) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 47.502441 210.516016 ] concat %I [ (0.2) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 47.502441 338.689844 ] concat %I [ (0.4) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 47.502441 466.863672 ] concat %I [ (0.6) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 47.502441 595.037500 ] concat %I [ (0.8) ] Text End Begin %I Text %I cfg plotFg 0 0 0 SetCFg %I f *times-medium-r*-14-* /Times-Roman 14.00000 SetF %I t [ 1.000000 0.000000 0.000000 1.000000 58.002441 723.211328 ] concat %I [ (1) ] Text End Begin %I MLine %I b 65535 0 0 0 [ ] 0 SetB %I cfg plotFg 0 0 0 SetCFg %I cbg White 1 1 1 SetCBg %I p none SetP %I t [ 0.183105 0 0 0.183105 0 0 ] concat %I 101 3900 400 3865 505 3830 610 3795 715 3760 819 3725 923 3690 1027 3655 1130 3620 1233 3585 1335 3550 1436 3515 1536 3480 1636 3445 1734 3410 1832 3375 1928 3340 2023 3305 2116 3270 2208 3235 2299 3200 2388 3165 2475 3130 2561 3095 2645 3060 2726 3025 2806 2990 2884 2955 2959 2920 3033 2885 3104 2850 3172 2815 3238 2780 3301 2745 3362 2710 3420 2675 3475 2640 3527 2605 3576 2570 3622 2535 3665 2500 3704 2465 3740 2430 3773 2395 3802 2360 3827 2325 3849 2290 3867 2255 3881 2220 3892 2185 3898 2150 3900 2115 3898 2080 3892 2045 3881 2010 3867 1975 3849 1940 3827 1905 3802 1870 3773 1835 3740 1800 3704 1765 3665 1730 3622 1695 3576 1660 3527 1625 3475 1590 3420 1555 3362 1520 3301 1485 3238 1450 3172 1415 3104 1380 3033 1345 2959 1310 2884 1275 2806 1240 2726 1205 2645 1170 2561 1135 2475 1100 2388 1065 2299 1030 2208 995 2116 960 2023 925 1928 890 1832 855 1734 820 1636 785 1536 750 1436 715 1335 680 1233 645 1130 610 1027 575 923 540 819 505 715 470 610 435 505 400 400 101 MLine End End %I eop %%Trailer end showpage