开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数值算法/人工智能 > 查看源码
glueing.pstex
资源名称：leda.tar.gz　[点击查看]
上传用户：gzelex
上传日期：2007-01-07
资源大小：707k
文件大小：4k
源码类别：

数值算法/人工智能

开发平台：

MultiPlatform

glueing.pstex：源码内容
  1. %!PS-Adobe-2.0 EPSF
  2. %%Title: /tmp/xfig-fig009849
  3. %%Creator: fig2dev
  4. %%CreationDate: Mon Sep  6 09:50:55 1993
  5. %%For: esser@mpii01026 (Andrea &)
  6. %%BoundingBox: 0 0 368 257
  7. %%Pages: 0
  8. %%EndComments
  9. /$F2psDict 200 dict def 
  10. $F2psDict begin
  11. $F2psDict /mtrx matrix put
  12. /l {lineto} bind def
  13. /m {moveto} bind def
  14. /s {stroke} bind def
  15. /n {newpath} bind def
  16. /gs {gsave} bind def
  17. /gr {grestore} bind def
  18. /clp {closepath} bind def
  19. /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
  20. 4 -2 roll mul setrgbcolor} bind def
  21. /col-1 {} def
  22. /col0 {0 0 0 setrgbcolor} bind def
  23. /col1 {0 0 1 setrgbcolor} bind def
  24. /col2 {0 1 0 setrgbcolor} bind def
  25. /col3 {0 1 1 setrgbcolor} bind def
  26. /col4 {1 0 0 setrgbcolor} bind def
  27. /col5 {1 0 1 setrgbcolor} bind def
  28. /col6 {1 1 0 setrgbcolor} bind def
  29. /col7 {1 1 1 setrgbcolor} bind def
  30.  /DrawEllipse {
  31. /endangle exch def
  32. /startangle exch def
  33. /yrad exch def
  34. /xrad exch def
  35. /y exch def
  36. /x exch def
  37. /savematrix mtrx currentmatrix def
  38. x y translate xrad yrad scale 0 0 1 startangle endangle arc
  39. savematrix setmatrix
  40. } def
  42. end
  43. /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
  44. /$F2psEnd {$F2psEnteredState restore end} def
  45. %%EndProlog
  47. $F2psBegin
  48. 0 setlinecap 0 setlinejoin
  49. -10.0 284.0 translate 0.900 -0.900 scale
  50. 0.500 setlinewidth
  51. n 334.777 54.590 m 341.000 60.000 l 332.963 58.155 l gs 2 setlinejoin col-1 s gr
  52. n 326.500 88.500 31.977 -63.034 -170.096 arcn
  53. gs col-1 s gr
  54. n 365.884 79.726 m 362.000 87.000 l 362.004 78.754 l gs 2 setlinejoin col-1 s gr
  55. n 343.841 82.451 18.720 14.064 -80.285 arcn
  56. gs col-1 s gr
  57. n 75.777 63.379 m 84.000 64.000 l 76.452 67.321 l gs 2 setlinejoin col-1 s gr
  58. n 87.159 82.451 18.720 165.936 -99.715 arc
  59. gs col-1 s gr
  60. n 136.594 74.775 m 136.000 83.000 l 132.654 75.463 l gs 2 setlinejoin col-1 s gr
  61. n 104.500 88.500 31.977 -116.966 -9.904 arc
  62. gs col-1 s gr
  63. % Ellipse
  64. n 324 91 2 2 0 360 DrawEllipse gs 0.00 setgray fill gr
  65. gs col-1 s gr
  66. % Ellipse
  67. n 324 120 2 2 0 360 DrawEllipse gs 0.00 setgray fill gr
  68. gs col-1 s gr
  69. % Ellipse
  70. n 107 91 2 2 0 360 DrawEllipse gs 0.00 setgray fill gr
  71. gs col-1 s gr
  72. % Ellipse
  73. n 107 122 2 2 0 360 DrawEllipse gs 0.00 setgray fill gr
  74. gs col-1 s gr
  75. % Ellipse
  76. n 107 237 2 2 0 360 DrawEllipse gs 0.00 setgray fill gr
  77. gs col-1 s gr
  78. % Ellipse
  79. n 324 237 2 2 0 360 DrawEllipse gs 0.00 setgray fill gr
  80. gs col-1 s gr
  81. % Polyline
  82. n 356 29 m 324 91 l gs col-1 s gr
  83. % Polyline
  84. n 324 91 m 241 71 l gs col-1 s gr
  85. % Polyline
  86. n 107 91 m 107 278 l gs 0.00 setgray fill gr
  87. gs col-1 s gr
  88. % Polyline
  89. n 75 29 m 107 91 l gs 0.00 setgray fill gr
  90. gs col-1 s gr
  91. % Polyline
  92. n 324 91 m 324 278 l gs 0.00 setgray fill gr
  93. gs col-1 s gr
  94. n 90.000 136.000 m 92.000 128.000 l 94.000 136.000 l gs 2 setlinejoin col-1 s gr
  95. % Polyline
  96. n 92 128 m 92 224 l gs col-1 s gr
  97. n 90.000 250.000 m 92.000 242.000 l 94.000 250.000 l gs 2 setlinejoin col-1 s gr
  98. % Polyline
  99. n 92 242 m 92 315 l gs col-1 s gr
  100. n 297.000 151.000 m 299.000 143.000 l 301.000 151.000 l gs 2 setlinejoin col-1 s gr
  101. % Polyline
  102. n 299 143 m 299 299 l gs col-1 s gr
  103. % Polyline
  104. n 107 93 m 190 73 l gs 0.00 setgray fill gr
  105. gs col-1 s gr
  106. % Polyline
  107. n 356 113 m 356 209 l gs col-1 s gr
  108. n 358.000 201.000 m 356.000 209.000 l 354.000 201.000 l gs 2 setlinejoin col-1 s gr
  109. % Polyline
  110. n 127 143 m 127 299 l gs col-1 s gr
  111. n 129.000 291.000 m 127.000 299.000 l 125.000 291.000 l gs 2 setlinejoin col-1 s gr
  112. % Polyline
  113. n 356 217 m 356 290 l gs col-1 s gr
  114. n 358.000 282.000 m 356.000 290.000 l 354.000 282.000 l gs 2 setlinejoin col-1 s gr
  115. % Interpolated spline
  116. n 324 91 m
  117. 362.560 86.462 375.017 86.462 376 91 curveto
  118. 378.477 98.231 365.328 105.846 324 122 curveto
  119. gs col-1 s gr
  120. % Interpolated spline
  121. n 107 91 m
  122. 69.100 85.798 56.124 85.798 55 91 curveto
  123. 52.820 97.733 65.796 105.521 107 122 curveto
  124. gs col-1 s gr
  125. % Interpolated spline
  126. n 324 91 m
  127. 351.487 55.308 367.404 44.923 387 50 curveto
  128. 411.695 56.692 420.000 90.615 418 112 curveto
  129. 415.156 148.769 391.626 179.923 324 237 curveto
  130. gs col-1 s gr
  131. % Interpolated spline
  132. n 106 93 m
  133. 78.677 56.840 62.927 46.590 43 52 curveto
  134. 18.498 58.653 10.055 92.590 12 114 curveto
  135. 15.291 150.230 38.791 181.480 106 239 curveto
  136. gs col-1 s gr
  137. $F2psEnd