home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume24 / gnuplot3 / part07 < prev    next >
Text File  |  1991-10-26  |  49KB  |  1,250 lines
  1. Newsgroups: comp.sources.misc
  2. From: gershon%gr@cs.utah.edu (Elber Gershon)
  3. Subject:  v24i029:  gnuplot3 - interactive function plotting utility, Part07/26
  4. Message-ID: <1991Oct26.222334.6503@sparky.imd.sterling.com>
  5. X-Md4-Signature: 101cf708e70aabfd3412ddc119814cd4
  6. Date: Sat, 26 Oct 1991 22:23:34 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: gershon%gr@cs.utah.edu (Elber Gershon)
  10. Posting-number: Volume 24, Issue 29
  11. Archive-name: gnuplot3/part07
  12. Environment: UNIX, MS-DOS, VMS
  13. Supersedes: gnuplot2: Volume 11, Issue 65-79
  14.  
  15. #!/bin/sh
  16. # this is Part.07 (part 7 of a multipart archive)
  17. # do not concatenate these parts, unpack them in order with /bin/sh
  18. # file gnuplot/demo/polar.dat continued
  19. #
  20. if test ! -r _shar_seq_.tmp; then
  21.     echo 'Please unpack part 1 first!'
  22.     exit 1
  23. fi
  24. (read Scheck
  25.  if test "$Scheck" != 7; then
  26.     echo Please unpack part "$Scheck" next!
  27.     exit 1
  28.  else
  29.     exit 0
  30.  fi
  31. ) < _shar_seq_.tmp || exit 1
  32. if test ! -f _shar_wnt_.tmp; then
  33.     echo 'x - still skipping gnuplot/demo/polar.dat'
  34. else
  35. echo 'x - continuing file gnuplot/demo/polar.dat'
  36. sed 's/^X//' << 'SHAR_EOF' >> 'gnuplot/demo/polar.dat' &&
  37. X     24.000      0.000   -200.000      0.000      5.169      0.000 
  38. X     26.000      0.000   -200.000      0.000      2.680      0.000 
  39. X     28.000      0.000   -200.000      0.000     -0.039      0.000 
  40. X     30.000      0.000   -200.000      0.000     -2.998      0.000 
  41. X     32.000      0.000   -200.000      0.000     -6.204      0.000 
  42. X     34.000      0.000   -200.000      0.000     -9.670      0.000 
  43. X     36.000      0.000   -200.000      0.000    -13.407      0.000 
  44. X     38.000      0.000   -200.000      0.000    -17.429      0.000 
  45. X     40.000      0.000   -200.000      0.000    -21.751      0.000 
  46. X     42.000      0.000   -200.000      0.000    -26.391      0.000 
  47. X     44.000      0.000   -200.000      0.000    -31.368      0.000 
  48. X     46.000      0.000   -200.000      0.000    -36.705      0.000 
  49. X     48.000      0.000   -200.000      0.000    -42.429      0.000 
  50. X     50.000      0.000   -200.000      0.000    -48.569      0.000 
  51. X     52.000      0.000   -200.000      0.000    -55.160      0.000 
  52. X     54.000      0.000   -200.000      0.000    -62.243      0.000 
  53. X     56.000      0.000   -200.000      0.000    -69.867      0.000 
  54. X     58.000      0.000   -200.000      0.000    -78.087      0.000 
  55. X     60.000      0.000   -200.000      0.000    -86.971      0.000 
  56. X     62.000      0.000   -200.000      0.000    -96.602      0.000 
  57. X     64.000      0.000   -200.000      0.000   -107.080      0.000 
  58. X     66.000      0.000   -200.000      0.000   -118.530      0.000 
  59. X     68.000      0.000   -200.000      0.000   -131.110      0.000 
  60. X     70.000      0.000   -200.000      0.000   -145.022      0.000 
  61. X     72.000      0.000   -200.000      0.000   -160.534      0.000 
  62. X     74.000      0.000   -200.000      0.000   -177.982      0.000 
  63. X     76.000      0.000   -200.000      0.000   -195.848      0.000 
  64. X     78.000      0.000   -200.000      0.000   -199.967      0.000 
  65. X     80.000      0.000   -200.000      0.000   -200.000      0.000 
  66. X     82.000      0.000   -200.000      0.000   -200.000      0.000 
  67. X     84.000      0.000   -200.000      0.000   -200.000      0.000 
  68. X     86.000      0.000   -200.000      0.000   -200.000      0.000 
  69. X     88.000      0.000   -200.000      0.000   -200.000      0.000 
  70. X     90.000      0.000   -200.000      0.000   -200.000      0.000 
  71. X     92.000      0.000   -200.000      0.000   -200.000      0.000 
  72. X     94.000      0.000   -200.000      0.000   -200.000      0.000 
  73. X     96.000      0.000   -200.000      0.000   -200.000      0.000 
  74. X     98.000      0.000   -200.000      0.000   -200.000      0.000 
  75. X    100.000      0.000   -200.000      0.000   -200.000      0.000 
  76. X    102.000      0.000   -200.000      0.000   -200.000      0.000 
  77. X    104.000      0.000   -200.000      0.000   -200.000      0.000 
  78. X    106.000      0.000   -200.000      0.000   -200.000      0.000 
  79. X    108.000      0.000   -200.000      0.000   -200.000      0.000 
  80. X    110.000      0.000   -200.000      0.000   -200.000      0.000 
  81. X    112.000      0.000   -200.000      0.000   -200.000      0.000 
  82. X    114.000      0.000   -200.000      0.000   -200.000      0.000 
  83. X    116.000      0.000   -200.000      0.000   -200.000      0.000 
  84. X    118.000      0.000   -200.000      0.000   -200.000      0.000 
  85. X    120.000      0.000   -200.000      0.000   -200.000      0.000 
  86. X    122.000      0.000   -200.000      0.000   -200.000      0.000 
  87. X    124.000      0.000   -200.000      0.000   -200.000      0.000 
  88. X    126.000      0.000   -200.000      0.000   -200.000      0.000 
  89. X    128.000      0.000   -200.000      0.000   -200.000      0.000 
  90. X    130.000      0.000   -200.000      0.000   -200.000      0.000 
  91. X    132.000      0.000   -200.000      0.000   -200.000      0.000 
  92. X    134.000      0.000   -200.000      0.000   -200.000      0.000 
  93. X    136.000      0.000   -200.000      0.000   -200.000      0.000 
  94. X    138.000      0.000   -200.000      0.000   -200.000      0.000 
  95. X    140.000      0.000   -200.000      0.000   -200.000      0.000 
  96. X    142.000      0.000   -200.000      0.000   -200.000      0.000 
  97. X    144.000      0.000   -200.000      0.000   -200.000      0.000 
  98. X    146.000      0.000   -200.000      0.000   -200.000      0.000 
  99. X    148.000      0.000   -200.000      0.000   -200.000      0.000 
  100. X    150.000      0.000   -200.000      0.000   -200.000      0.000 
  101. X    152.000      0.000   -200.000      0.000   -200.000      0.000 
  102. X    154.000      0.000   -200.000      0.000   -200.000      0.000 
  103. X    156.000      0.000   -200.000      0.000   -200.000      0.000 
  104. X    158.000      0.000   -200.000      0.000   -200.000      0.000 
  105. X    160.000      0.000   -200.000      0.000   -200.000      0.000 
  106. X    162.000      0.000   -200.000      0.000   -200.000      0.000 
  107. X    164.000      0.000   -200.000      0.000   -200.000      0.000 
  108. X    166.000      0.000   -200.000      0.000   -200.000      0.000 
  109. X    168.000      0.000   -200.000      0.000   -200.000      0.000 
  110. X    170.000      0.000   -200.000      0.000   -200.000      0.000 
  111. X    172.000      0.000   -200.000      0.000   -200.000      0.000 
  112. X    174.000      0.000   -200.000      0.000   -200.000      0.000 
  113. X    176.000      0.000   -200.000      0.000   -200.000      0.000 
  114. X    178.000      0.000   -200.000      0.000   -200.000      0.000 
  115. X    180.000      0.000   -200.000      0.000   -200.000      0.000 
  116. SHAR_EOF
  117. echo 'File gnuplot/demo/polar.dat is complete' &&
  118. chmod 0644 gnuplot/demo/polar.dat ||
  119. echo 'restore of gnuplot/demo/polar.dat failed'
  120. Wc_c="`wc -c < 'gnuplot/demo/polar.dat'`"
  121. test 6538 -eq "$Wc_c" ||
  122.     echo 'gnuplot/demo/polar.dat: original size 6538, current size' "$Wc_c"
  123. rm -f _shar_wnt_.tmp
  124. fi
  125. # ============= gnuplot/demo/errorbar.demo ==============
  126. if test -f 'gnuplot/demo/errorbar.demo' -a X"$1" != X"-c"; then
  127.     echo 'x - skipping gnuplot/demo/errorbar.demo (File already exists)'
  128.     rm -f _shar_wnt_.tmp
  129. else
  130. > _shar_wnt_.tmp
  131. echo 'x - extracting gnuplot/demo/errorbar.demo (Text)'
  132. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/demo/errorbar.demo' &&
  133. #
  134. # Requires data file "err.dat" from this directory,
  135. # so change current working directory to this directory before running.
  136. # gnuplot> set term <term-type>
  137. # gnuplot> load 'errorbar.demo'
  138. #
  139. X
  140. set title "Demonstration of error bars (both ylow and yhigh, default format)"
  141. plot [-3:65] "err.dat" with errorbars
  142. X
  143. pause -1 "Hit return to continue"
  144. X
  145. # this should look the same
  146. set title "Demonstration of error bars (both ylow and yhigh)"
  147. plot [-3:65] "err.dat" using 1:2:3:4 with errorbars
  148. X
  149. pause -1 "Hit return to continue"
  150. X
  151. set title "Demonstration of error bars (only ydelta)"
  152. plot [-3:65] "err.dat" using 1:2:5 with errorbars
  153. X
  154. pause -1 "Hit return to continue"
  155. X
  156. set title "Plot data file twice to get lines and errorbars"
  157. plot [-3:65] [6:14] "err.dat" with lines, "err.dat" using 1:2:4:3 with errorbars
  158. X
  159. set title ""
  160. set autoscale
  161. X
  162. pause -1 "Hit return to continue"
  163. SHAR_EOF
  164. chmod 0644 gnuplot/demo/errorbar.demo ||
  165. echo 'restore of gnuplot/demo/errorbar.demo failed'
  166. Wc_c="`wc -c < 'gnuplot/demo/errorbar.demo'`"
  167. test 867 -eq "$Wc_c" ||
  168.     echo 'gnuplot/demo/errorbar.demo: original size 867, current size' "$Wc_c"
  169. rm -f _shar_wnt_.tmp
  170. fi
  171. # ============= gnuplot/demo/antenna.dat ==============
  172. if test -f 'gnuplot/demo/antenna.dat' -a X"$1" != X"-c"; then
  173.     echo 'x - skipping gnuplot/demo/antenna.dat (File already exists)'
  174.     rm -f _shar_wnt_.tmp
  175. else
  176. > _shar_wnt_.tmp
  177. echo 'x - extracting gnuplot/demo/antenna.dat (Text)'
  178. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/demo/antenna.dat' &&
  179. X   0.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  180. X   2.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  181. X   4.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  182. X   6.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  183. X   8.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  184. X  10.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  185. X  12.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  186. X  14.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  187. X  16.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  188. X  18.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  189. X  20.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  190. X  22.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  191. X  24.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  192. X  26.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  193. X  28.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  194. X  30.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  195. X  32.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  196. X  34.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  197. X  36.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  198. X  38.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  199. X  40.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  200. X  42.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  201. X  44.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  202. X  46.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  203. X  48.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  204. X  50.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  205. X  52.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  206. X  54.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  207. X  56.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  208. X  58.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  209. X  60.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  210. X  62.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  211. X  64.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  212. X  66.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  213. X  68.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  214. X  70.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  215. X  72.000 -41.802E+00 -37.180E+00 -39.114E+00 -24.830E+00
  216. X  74.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  217. X  76.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  218. X  78.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  219. X  80.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  220. X  82.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  221. X  84.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  222. X  86.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  223. X  88.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  224. X  90.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  225. X  92.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  226. X  94.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  227. X  96.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  228. X  98.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  229. X 100.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  230. X 102.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  231. X 104.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  232. X 106.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  233. X 108.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  234. X 110.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  235. X 112.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  236. X 114.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  237. X 116.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  238. X 118.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  239. X 120.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  240. X 122.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  241. X 124.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  242. X 126.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  243. X 128.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  244. X 130.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  245. X 132.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  246. X 134.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  247. X 136.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  248. X 138.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  249. X 140.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  250. X 142.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  251. X 144.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  252. X 146.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  253. X 148.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  254. X 150.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  255. X 152.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  256. X 154.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  257. X 156.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  258. X 158.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  259. X 160.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  260. X 162.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  261. X 164.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  262. X 166.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  263. X 168.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  264. X 170.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  265. X 172.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  266. X 174.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  267. X 176.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  268. X 178.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  269. X 180.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  270. X 182.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  271. X 184.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  272. X 186.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  273. X 188.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  274. X 190.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  275. X 192.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  276. X 194.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  277. X 196.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  278. X 198.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  279. X 200.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  280. X 202.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  281. X 204.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  282. X 206.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  283. X 208.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  284. X 210.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  285. X 212.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  286. X 214.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  287. X 216.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  288. X 218.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  289. X 220.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  290. X 222.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  291. X 224.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  292. X 226.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  293. X 228.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  294. X 230.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  295. X 232.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  296. X 234.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  297. X 236.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  298. X 238.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  299. X 240.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  300. X 242.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  301. X 244.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  302. X 246.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  303. X 248.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  304. X 250.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  305. X 252.000 -41.802E+00 -37.180E+00 -39.114E+00 -24.830E+00
  306. X 254.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  307. X 256.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  308. X 258.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  309. X 260.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  310. X 262.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  311. X 264.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  312. X 266.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  313. X 268.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  314. X 270.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  315. X 272.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  316. X 274.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  317. X 276.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  318. X 278.000  13.099E-02  42.554E-01 -25.105E+00  59.101E-01
  319. X 280.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  320. X 282.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  321. X 284.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  322. X 286.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  323. X 288.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  324. X 290.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  325. X 292.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  326. X 294.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  327. X 296.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  328. X 298.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  329. X 300.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  330. X 302.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  331. X 304.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  332. X 306.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  333. X 308.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  334. X 310.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  335. X 312.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  336. X 314.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  337. X 316.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  338. X 318.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  339. X 320.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  340. X 322.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  341. X 324.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  342. X 326.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  343. X 328.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  344. X 330.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  345. X 332.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  346. X 334.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  347. X 336.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  348. X 338.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  349. X 340.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  350. X 342.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  351. X 344.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  352. X 346.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  353. X 348.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  354. X 350.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  355. X 352.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  356. X 354.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  357. X 356.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  358. X 358.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  359. X 360.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  360. X   2.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  361. X   4.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  362. X   6.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  363. X   8.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  364. X  10.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  365. X  12.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  366. X  14.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  367. X  16.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  368. X  18.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  369. X  20.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  370. X  22.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  371. X  24.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  372. X  26.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  373. X  28.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  374. X  30.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  375. X  32.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  376. X  34.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  377. X  36.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  378. X  38.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  379. X  40.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  380. X  42.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  381. X  44.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  382. X  46.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  383. X  48.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  384. X  50.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  385. X  52.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  386. X  54.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  387. X  56.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  388. X  58.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  389. X  60.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  390. X  62.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  391. X  64.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  392. X  66.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  393. X  68.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  394. X  70.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  395. X  72.000 -41.802E+00 -37.180E+00 -39.114E+00 -24.830E+00
  396. X  74.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  397. X  76.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  398. X  78.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  399. X  80.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  400. X  82.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  401. X  84.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  402. X  86.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  403. X  88.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  404. X  90.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  405. X  92.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  406. X  94.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  407. X  96.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  408. X  98.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  409. X 100.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  410. X 102.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  411. X 104.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  412. X 106.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  413. X 108.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  414. X 110.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  415. X 112.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  416. X 114.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  417. X 116.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  418. X 118.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  419. X 120.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  420. X 122.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  421. X 124.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  422. X 126.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  423. X 128.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  424. X 130.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  425. X 132.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  426. X 134.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  427. X 136.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  428. X 138.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  429. X 140.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  430. X 142.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  431. X 144.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  432. X 146.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  433. X 148.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  434. X 150.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  435. X 152.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  436. X 154.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  437. X 156.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  438. X 158.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  439. X 160.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  440. X 162.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  441. X 164.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  442. X 166.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  443. X 168.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  444. X 170.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  445. X 172.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  446. X 174.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  447. X 176.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  448. X 178.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  449. X 180.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  450. X 182.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  451. X 184.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  452. X 186.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  453. X 188.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  454. X 190.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  455. X 192.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  456. X 194.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  457. X 196.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  458. X 198.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  459. X 200.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  460. X 202.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  461. X 204.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  462. X 206.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  463. X 208.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  464. X 210.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  465. X 212.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  466. X 214.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  467. X 216.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  468. X 218.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  469. X 220.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  470. X 222.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  471. X 224.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  472. X 226.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  473. X 228.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  474. X 230.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  475. X 232.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  476. X 234.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  477. X 236.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  478. X 238.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  479. X 240.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  480. X 242.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  481. X 244.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  482. X 246.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  483. X 248.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  484. X 250.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  485. X 252.000 -41.802E+00 -37.180E+00 -39.114E+00 -24.830E+00
  486. X 254.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  487. X 256.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  488. X 258.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  489. X 260.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  490. X 262.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  491. X 264.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  492. X 266.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  493. X 268.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  494. X 270.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  495. X 272.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  496. X 274.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  497. X 276.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  498. X 278.000  13.099E-02  42.554E-01 -25.105E+00  59.101E-01
  499. X 280.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  500. X 282.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  501. X 284.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  502. X 286.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  503. X 288.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  504. X 290.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  505. X 292.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  506. X 294.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  507. X 296.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  508. X 298.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  509. X 300.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  510. X 302.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  511. X 304.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  512. X 306.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  513. X 308.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  514. X 310.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  515. X 312.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  516. X 314.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  517. X 316.000 -39.287E+00 -23.397E+00 -38.646E+00 -60.943E-01
  518. X 318.000 -38.418E+00 -14.735E+00 -29.897E+00 -76.375E-01
  519. X 320.000 -36.549E+00 -12.197E+00 -27.142E+00 -11.075E+00
  520. X 322.000 -35.220E+00 -12.594E+00 -27.052E+00 -15.787E+00
  521. X 324.000 -35.691E+00 -16.286E+00 -29.566E+00 -13.578E+00
  522. X 326.000 -37.632E+00 -21.690E+00 -37.458E+00 -96.424E-01
  523. X 328.000 -33.989E+00 -13.340E+00 -38.930E+00 -75.039E-01
  524. X 330.000 -28.216E+00 -83.757E-01 -29.576E+00 -64.985E-01
  525. X 332.000 -24.356E+00 -58.580E-01 -26.299E+00 -60.712E-01
  526. X 334.000 -22.103E+00 -48.803E-01 -25.429E+00 -59.416E-01
  527. X 336.000 -21.258E+00 -52.193E-01 -26.432E+00 -62.183E-01
  528. X 338.000 -22.060E+00 -71.064E-01 -29.743E+00 -74.312E-01
  529. X 340.000 -25.979E+00 -11.868E+00 -38.677E+00 -10.860E+00
  530. X 342.000 -41.802E+00 -37.181E+00 -39.114E+00 -24.830E+00
  531. X 344.000 -20.405E+00 -10.185E+00 -30.112E+00 -11.564E+00
  532. X 346.000 -12.849E+00 -36.543E-01 -26.702E+00 -36.253E-01
  533. X 348.000 -76.407E-01  15.917E-02 -25.211E+00  82.257E-02
  534. X 350.000 -34.589E-01  26.769E-01 -24.794E+00  38.084E-01
  535. X 352.000  13.100E-02  42.554E-01 -25.105E+00  59.101E-01
  536. X 354.000  33.053E-01  48.742E-01 -26.062E+00  73.795E-01
  537. X 356.000  60.696E-01  40.782E-01 -28.040E+00  83.501E-01
  538. X 358.000  81.667E-01  13.355E-02 -32.735E+00  89.007E-01
  539. X 360.000  90.007E-01 -35.926E+00 -71.297E+00  90.783E-01
  540. SHAR_EOF
  541. chmod 0644 gnuplot/demo/antenna.dat ||
  542. echo 'restore of gnuplot/demo/antenna.dat failed'
  543. Wc_c="`wc -c < 'gnuplot/demo/antenna.dat'`"
  544. test 20577 -eq "$Wc_c" ||
  545.     echo 'gnuplot/demo/antenna.dat: original size 20577, current size' "$Wc_c"
  546. rm -f _shar_wnt_.tmp
  547. fi
  548. # ============= gnuplot/demo/all.demo ==============
  549. if test -f 'gnuplot/demo/all.demo' -a X"$1" != X"-c"; then
  550.     echo 'x - skipping gnuplot/demo/all.demo (File already exists)'
  551.     rm -f _shar_wnt_.tmp
  552. else
  553. > _shar_wnt_.tmp
  554. echo 'x - extracting gnuplot/demo/all.demo (Text)'
  555. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/demo/all.demo' &&
  556. #
  557. # Executes ALL demos in this directory, in functionality order.
  558. #
  559. X
  560. pause 0 "******************** file simple.demo ********************"
  561. load "simple.demo"
  562. X
  563. pause 0 "******************** file controls.demo ********************"
  564. load "controls.demo"
  565. X
  566. pause 0 "******************** file electron.demo ********************"
  567. load "electron.demo"
  568. X
  569. pause 0 "******************** file using.demo ********************"
  570. load "using.demo"
  571. X
  572. pause 0 "******************** file errorbar.demo ********************"
  573. load "errorbar.demo"
  574. X
  575. pause 0 "******************** file param.demo ********************"
  576. load "param.demo"
  577. X
  578. pause 0 "******************** file polar.demo ********************"
  579. load "polar.demo"
  580. X
  581. pause 0 "******************** file poldat.demo ********************"
  582. load "poldat.demo"
  583. X
  584. pause 0 "******************** file surface1.demo ********************"
  585. load "surface1.demo"
  586. X
  587. pause 0 "******************** file surface2.demo ********************"
  588. load "surface2.demo"
  589. X
  590. pause 0 "******************** file contours.demo ********************"
  591. load "contours.demo"
  592. X
  593. pause 0 "******************** file world.demo ********************"
  594. load "world.demo"
  595. X
  596. pause 0 "******************** file bivariat.demo ********************"
  597. load "bivariat.demo"
  598. SHAR_EOF
  599. chmod 0644 gnuplot/demo/all.demo ||
  600. echo 'restore of gnuplot/demo/all.demo failed'
  601. Wc_c="`wc -c < 'gnuplot/demo/all.demo'`"
  602. test 1245 -eq "$Wc_c" ||
  603.     echo 'gnuplot/demo/all.demo: original size 1245, current size' "$Wc_c"
  604. rm -f _shar_wnt_.tmp
  605. fi
  606. # ============= gnuplot/demo/bivariat.demo ==============
  607. if test -f 'gnuplot/demo/bivariat.demo' -a X"$1" != X"-c"; then
  608.     echo 'x - skipping gnuplot/demo/bivariat.demo (File already exists)'
  609.     rm -f _shar_wnt_.tmp
  610. else
  611. > _shar_wnt_.tmp
  612. echo 'x - extracting gnuplot/demo/bivariat.demo (Text)'
  613. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/demo/bivariat.demo' &&
  614. #
  615. # This demo is very slow and requires unusually large stack size.
  616. # Do not attempt to run this demo under MSDOS.
  617. #
  618. X
  619. # the function integral_f(x) approximates the integral of f(x) from 0 to x.
  620. # integral2_f(x,y) approximates the integral from x to y.
  621. # define f(x) to be any single variable function
  622. #
  623. # the integral is calculated as the sum of f(x_n)*delta 
  624. #   do this x/delta times (from x down to 0)
  625. #
  626. f(x) = exp(-x**2)
  627. delta = 0.025
  628. #
  629. # integral_f(x) takes one variable, the upper limit.  0 is the lower limit.
  630. # calculate the integral of function f(t) from 0 to x
  631. integral_f(x) = (x>0)?integral1a(x):-integral1b(x)
  632. integral1a(x) = (x<=0)?0:(integral1a(x-delta)+delta*f(x))
  633. integral1b(x) = (x>=0)?0:(integral1b(x+delta)+delta*f(x))
  634. #
  635. # integral2_f(x,y) takes two variables; x is the lower limit, and y the upper.
  636. # claculate the integral of function f(t) from x to y
  637. integral2_f(x,y) = (x<y)?integral2(x,y):-integral2(y,x)
  638. integral2(x,y) = (x>y)?0:(integral2(x+delta,y)+delta*f(x))
  639. X
  640. set title "approximate the integral of functions"
  641. set samples 50
  642. X
  643. plot [-5:5] f(x) title "f(x)=exp(-x**2)", 2/sqrt(pi)*integral_f(x) title "erf(x)=2/sqrt(pi)*integral_f(x)"
  644. X
  645. pause -1 "Hit return to continue"
  646. X
  647. f(x)=sin(x)
  648. X
  649. plot [-5:5] f(x) title "f(x)=sin(x)", integral_f(x)
  650. X
  651. pause -1 "Hit return to continue"
  652. X
  653. set title "approximate the integral of functions (upper and lower limits)"
  654. X
  655. f(x)=(x-2)**2-20
  656. X
  657. plot [-10:10] f(x) title "f(x)=(x-2)**2-20", integral2_f(-5,x)
  658. X
  659. pause -1 "Hit return to continue"
  660. X
  661. f(x)=sin(x-1)-.75*sin(2*x-1)+(x**2)/8-5
  662. X
  663. plot  [-10:10] f(x) title "f(x)=sin(x-1)-0.75*sin(2*x-1)+(x**2)/8-5", integral2_f(x,1)
  664. X
  665. pause -1 "Hit return to continue"
  666. X
  667. #
  668. # This definition computes the ackermann. Do not attempt to compute its
  669. # values for non integral values. In addition, do not attempt to compute
  670. # its beyond m = 3, unless you want to wait really long time.
  671. X
  672. ack(m,n) = (m == 0) ? n + 1 : (n == 0) ? ack(m-1,1) : ack(m-1,ack(m,n-1))
  673. X
  674. set xrange [0:3]
  675. set yrange [0:3]
  676. X
  677. set isosamples 4
  678. set samples 4
  679. X
  680. set title "Plot of the ackermann function"
  681. X
  682. splot ack(x, y)
  683. X
  684. pause -1 "Hit return to continue"
  685. X
  686. set xrange [-5:5]
  687. set yrange [-10:10]
  688. set isosamples 10
  689. set samples 100
  690. set key 4,-3
  691. set title "Min(x,y) and Max(x,y)"
  692. X
  693. #
  694. min(x,y) = (x < y) ? x : y
  695. max(x,y) = (x > y) ? x : y
  696. X
  697. plot sin(x), x**2, x**3, max(sin(x), min(x**2, x**3))+0.5
  698. X
  699. pause -1 "Hit return to continue"
  700. X
  701. #
  702. # gcd(x,y) finds the greatest common divisor of x and y,
  703. #          using Euclid's algorithm
  704. # as this is defined only for integers, first round to the nearest integer
  705. gcd(x,y) = gcd1(rnd(max(x,y)),rnd(min(x,y)))
  706. gcd1(x,y) = (y == 0) ? x : gcd1(y, x - x/y * y)
  707. rnd(x) = int(x+0.5)
  708. X
  709. set samples 59
  710. set xrange [1:59]
  711. set auto
  712. set key
  713. X
  714. set title "Greatest Common Divisor (for integers only)"
  715. X
  716. plot gcd(x, 60)
  717. pause -1 "Hit return to continue"
  718. X
  719. set xrange [-10:10]
  720. set yrange [-10:10]
  721. set auto
  722. set isosamples 10
  723. set samples 100
  724. set title ""
  725. X
  726. SHAR_EOF
  727. chmod 0644 gnuplot/demo/bivariat.demo ||
  728. echo 'restore of gnuplot/demo/bivariat.demo failed'
  729. Wc_c="`wc -c < 'gnuplot/demo/bivariat.demo'`"
  730. test 2915 -eq "$Wc_c" ||
  731.     echo 'gnuplot/demo/bivariat.demo: original size 2915, current size' "$Wc_c"
  732. rm -f _shar_wnt_.tmp
  733. fi
  734. # ============= gnuplot/docs/Makefile ==============
  735. if test ! -d 'gnuplot/docs'; then
  736.     echo 'x - creating directory gnuplot/docs'
  737.     mkdir 'gnuplot/docs'
  738. fi
  739. if test -f 'gnuplot/docs/Makefile' -a X"$1" != X"-c"; then
  740.     echo 'x - skipping gnuplot/docs/Makefile (File already exists)'
  741.     rm -f _shar_wnt_.tmp
  742. else
  743. > _shar_wnt_.tmp
  744. echo 'x - extracting gnuplot/docs/Makefile (Text)'
  745. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/docs/Makefile' &&
  746. # Makefile for GNUPLOT documentation
  747. #
  748. # Note that the top-level file for documentation is gnuplot.doc.
  749. # See README.
  750. #
  751. # To print manual:
  752. #    make gnuplot.dvi             (for latex)
  753. #    (print or view gnuplot.dvi)
  754. # OR
  755. #    make gnuplot.nroff           (for nroff)
  756. #    (print or view gnuplot.nroff)
  757. #   or
  758. #    make "TROFF=itroff" troff    (for troff; use your troff here)
  759. #
  760. # $Id: Makefile,v 1.1 90/01/11 15:43:03 dfk Exp Locker: dfk $
  761. X
  762. # usually overridden by ../Makefile
  763. HELPDEST = /usr/local/lib/
  764. X
  765. # substitute your troff command (and any flags) for this one
  766. TROFF=troff
  767. X  
  768. # substitute cp if you do not have the install program
  769. INSTALL=install
  770. X
  771. # Compiler flags
  772. # -DSYSV if att sys V
  773. # -DMSDOS if MSDOS PS
  774. # -traditional -g -O if gcc (set 'CC = gcc')
  775. # no extra flags for BSD
  776. CFLAGS = -s
  777. CC = cc
  778. X
  779. # default is what is needed for interactive gnuplot
  780. default: gnuplot.hlp gnuplot.gih
  781. X
  782. ### [tn]roff documentation
  783. troff: gnuplot.ms titlepage.ms
  784. X    tbl gnuplot.ms | eqn | $(TROFF) -ms
  785. X
  786. nroff gnuplot.nroff: gnuplot.ms titlepage.ms
  787. X    tbl gnuplot.ms | neqn | nroff -ms | col > gnuplot.nroff
  788. X
  789. ms gnuplot.ms: doc2ms gnuplot.doc
  790. X    ./doc2ms < gnuplot.doc > gnuplot.ms
  791. X
  792. doc2ms: doc2ms.c
  793. X    $(CC) $(CFLAGS) -o doc2ms doc2ms.c
  794. X
  795. ### LaTeX documentation
  796. tex gnuplot.tex: doc2tex gnuplot.doc
  797. X    ./doc2tex < gnuplot.doc > gnuplot.tex
  798. X
  799. dvi gnuplot.dvi: gnuplot.tex titlepage.tex
  800. X    (latex gnuplot.tex ; latex gnuplot.tex)
  801. X
  802. doc2tex: doc2tex.c
  803. X    $(CC) $(CFLAGS) -o doc2tex doc2tex.c
  804. X
  805. # this is how to make gnuplot.hlp
  806. hlp gnuplot.hlp: doc2hlp gnuplot.doc
  807. X    ./doc2hlp < gnuplot.doc > gnuplot.hlp
  808. X
  809. doc2hlp: doc2hlp.c
  810. X    $(CC) $(CFLAGS) -o doc2hlp doc2hlp.c
  811. X
  812. # this is how to make gnuplot.gih
  813. gih gnuplot.gih: doc2gih gnuplot.doc
  814. X    ./doc2gih < gnuplot.doc > gnuplot.gih
  815. X
  816. doc2gih: doc2gih.c
  817. X    $(CC) $(CFLAGS) -o doc2gih doc2gih.c
  818. X
  819. # this is how to check the gnuplot.doc file
  820. check: checkdoc gnuplot.doc
  821. X    ./checkdoc < gnuplot.doc
  822. X
  823. checkdoc: checkdoc.c
  824. X    $(CC) $(CFLAGS) -o checkdoc checkdoc.c
  825. X
  826. # For Unix and MSDOS only
  827. install-unix: gnuplot.gih
  828. X    $(INSTALL) gnuplot.gih $(HELPDEST)
  829. X
  830. # for VMS only
  831. install-vms: gnuplot.hlp
  832. X    $(INSTALL) gnuplot.hlp $(HELPDEST)
  833. X
  834. # remove all derived files
  835. clean:
  836. X    rm -f doc2ms gnuplot.nroff gnuplot.ms
  837. X    rm -f doc2tex gnuplot.tex gnuplot.dvi gnuplot.aux gnuplot.log gnuplot.toc
  838. X    rm -f doc2hlp gnuplot.hlp
  839. X    rm -f doc2gih gnuplot.gih
  840. X    rm -f checkdoc *~ *.o core a.out
  841. SHAR_EOF
  842. chmod 0644 gnuplot/docs/Makefile ||
  843. echo 'restore of gnuplot/docs/Makefile failed'
  844. Wc_c="`wc -c < 'gnuplot/docs/Makefile'`"
  845. test 2363 -eq "$Wc_c" ||
  846.     echo 'gnuplot/docs/Makefile: original size 2363, current size' "$Wc_c"
  847. rm -f _shar_wnt_.tmp
  848. fi
  849. # ============= gnuplot/docs/README ==============
  850. if test -f 'gnuplot/docs/README' -a X"$1" != X"-c"; then
  851.     echo 'x - skipping gnuplot/docs/README (File already exists)'
  852.     rm -f _shar_wnt_.tmp
  853. else
  854. > _shar_wnt_.tmp
  855. echo 'x - extracting gnuplot/docs/README (Text)'
  856. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/docs/README' &&
  857. Notes on the gnuplot help files and documentation.
  858. X
  859. Gnuplot documentation is available in three ways:
  860. X
  861. 1 - interactively, within gnuplot
  862. 2 - as a printed document. 
  863. 3 - as a manual page, through the Unix man(1) facility
  864. X
  865. The first two forms describe the inner workings, and contain
  866. equivalent information, while the third form tells how to run gnuplot.
  867. X
  868. The two first forms above derive their information from the file
  869. gnuplot.doc, which is the MASTER copy of gnuplot help information. All
  870. other forms, except for gnuplot.1, the man page, are derived from it. 
  871. X
  872. gnuplot.doc -> gnuplot.hlp 
  873. X            -> gnuplot.gih
  874. X            -> gnuplot.tex
  875. X            -> gnuplot.ms
  876. X                                      
  877. On VMS the interactive help is supplied by the system help facility,
  878. using the gnuplot.hlp file. This is made with ('make hlp').  On Unix,
  879. AmigaDOS, and MSDOS the interactive help is built in to the program,
  880. and uses the gnuplot.gih file ('make gih').
  881. X
  882. The printed document is available in either latex or troff/nroff (ms)
  883. format, using gnuplot.tex or gnuplot.ms, derived from gnuplot.doc with
  884. either doc2tex or doc2ms. Type 'make dvi' or 'make nroff'. For troff,
  885. type 'make ms' and then troff -ms gnuplot.ms in whatever way you use
  886. troff.
  887. X
  888. If VMS users prefer the gnuplot interactive help facility to the
  889. system facility, this can be easily changed in command.c.
  890. X
  891. X
  892. Description of the gnuplot.doc format:
  893. --------------------------------------
  894. X
  895. Here is an example of the DOC master help format:
  896. X
  897. ?
  898. 1 gnuplot
  899. X GNUPLOT is a command-driven interactive function plotting program.  It
  900. X ...
  901. ?exit
  902. 2 exit
  903. X 'exit', 'quit' and ...
  904. ?expressions
  905. 2 expressions
  906. X In general, any mathematical expression accepted by C, ...
  907. X
  908. X Topics:
  909. X functions operators
  910. ?expressions functions
  911. ?functions
  912. 3 functions
  913. X The functions in GNUPLOT are ...
  914. X
  915. X Topics:
  916. X abs acos arg ...
  917. ?expressions functions abs
  918. ?functions abs
  919. ?abs
  920. 4 abs
  921. X This function returns the absolute value of its argument.  The
  922. X returned value is of the same type as the argument. 
  923. ?expressions functions acos
  924. ?functions acos
  925. ?acos
  926. 4 acos
  927. X This function returns the arc cosine (inverse cosine) of its
  928. X argument.  'acos' returns its argument in radians. 
  929. X
  930. X
  931. Some notes about the format:
  932. ----------------------------
  933. Remember that all text must be able to be processed by gnuplot, VMS,
  934. X nroff, troff, and latex, and always do something reasonable. 
  935. The first column is reserved for control characters.
  936. Text does not start in the first column.
  937. Lines that start in column 2 may be typeset by LaTeX.
  938. Lines that have a space in column 2 are to be printed in a verbatim
  939. X environment by LaTeX.
  940. Do NOT use tabs in the help file.
  941. Conversion from this format to vax .hlp file involves removal of
  942. X lines starting with [?@#$%] (see doc2hlp). VMS uses the numbers
  943. X to represent a tree. 
  944. Conversion from this format to gnuplot .gih file involves removal of
  945. X lines starting with [0-9@#$%] (see doc2gih). Gnuplot matches your
  946. X help query against the ? lines to find the help information.
  947. X Multiple ? lines for one text block constitute synonyms. The most
  948. X specific should be first, eg 'expressions functions' before 'functions'.
  949. X Spaces are allowed here, but should be single.
  950. Backquote pairs are converted by the doc2tex program into boldface;
  951. X that is, `some text` is converted to {\bf some text}. Be sure to pair
  952. X the backquotes, or the whole document will be boldface!
  953. X
  954. Control characters in first column:
  955. ?    used by .gih format, for builtin interactive help - keyword
  956. 0-9  used by VMS help and by doc2{tex,ms} formatters to define level,keyword
  957. @    used by doc2{tex,ms} to define table start/end
  958. #    used by doc2tex: table entry
  959. %    used by doc2ms: table entry
  960. SHAR_EOF
  961. chmod 0644 gnuplot/docs/README ||
  962. echo 'restore of gnuplot/docs/README failed'
  963. Wc_c="`wc -c < 'gnuplot/docs/README'`"
  964. test 3681 -eq "$Wc_c" ||
  965.     echo 'gnuplot/docs/README: original size 3681, current size' "$Wc_c"
  966. rm -f _shar_wnt_.tmp
  967. fi
  968. # ============= gnuplot/docs/checkdoc.c ==============
  969. if test -f 'gnuplot/docs/checkdoc.c' -a X"$1" != X"-c"; then
  970.     echo 'x - skipping gnuplot/docs/checkdoc.c (File already exists)'
  971.     rm -f _shar_wnt_.tmp
  972. else
  973. > _shar_wnt_.tmp
  974. echo 'x - extracting gnuplot/docs/checkdoc.c (Text)'
  975. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/docs/checkdoc.c' &&
  976. /*
  977. X * checkdoc -- check a doc file for correctness of first column. 
  978. X *
  979. X * Prints out lines that have an illegal first character.
  980. X * First character must be space, digit, or ?, @, #, %, 
  981. X * or line must be empty.
  982. X *
  983. X * usage: checkdoc < docfile
  984. X * Modified by Russell Lang from hlp2ms.c by Thomas Williams 
  985. X *
  986. X * Original version by David Kotz used the following one line script!
  987. X * sed -e '/^$/d' -e '/^[ 0-9?@#%]/d' gnuplot.doc
  988. X *
  989. X */
  990. X
  991. #include <stdio.h>
  992. #include <ctype.h>
  993. X
  994. #define MAX_LINE_LEN    256
  995. #define TRUE 1
  996. #define FALSE 0
  997. X
  998. main()
  999. {
  1000. X    convert(stdin,stdout);
  1001. X    exit(0);
  1002. }
  1003. X
  1004. convert(a,b)
  1005. X    FILE *a,*b;
  1006. {
  1007. X    static char line[MAX_LINE_LEN];
  1008. X
  1009. X    while (fgets(line,MAX_LINE_LEN,a)) {
  1010. X       process_line(line, b);
  1011. X    }
  1012. }
  1013. X
  1014. process_line(line, b)
  1015. X    char *line;
  1016. X    FILE *b;
  1017. {
  1018. X    switch(line[0]) {        /* control character */
  1019. X       case '?': {            /* interactive help entry */
  1020. X          break;            /* ignore */
  1021. X       }
  1022. X       case '@': {            /* start/end table */
  1023. X          break;            /* ignore */
  1024. X       }
  1025. X       case '#': {            /* latex table entry */
  1026. X          break;            /* ignore */
  1027. X       }
  1028. X       case '%': {            /* troff table entry */
  1029. X          break;            /* ignore */
  1030. X       }
  1031. X       case '\n':            /* empty text line */
  1032. X       case ' ': {            /* normal text line */
  1033. X          break;
  1034. X       }
  1035. X       default: {
  1036. X          if (isdigit(line[0])) { /* start of section */
  1037. X                  /* ignore */
  1038. X          } else
  1039. X            fputs(line,b);    /* output bad line */
  1040. X          break;
  1041. X       }
  1042. X    }
  1043. }
  1044. X
  1045. SHAR_EOF
  1046. chmod 0666 gnuplot/docs/checkdoc.c ||
  1047. echo 'restore of gnuplot/docs/checkdoc.c failed'
  1048. Wc_c="`wc -c < 'gnuplot/docs/checkdoc.c'`"
  1049. test 1377 -eq "$Wc_c" ||
  1050.     echo 'gnuplot/docs/checkdoc.c: original size 1377, current size' "$Wc_c"
  1051. rm -f _shar_wnt_.tmp
  1052. fi
  1053. # ============= gnuplot/docs/doc2gih.c ==============
  1054. if test -f 'gnuplot/docs/doc2gih.c' -a X"$1" != X"-c"; then
  1055.     echo 'x - skipping gnuplot/docs/doc2gih.c (File already exists)'
  1056.     rm -f _shar_wnt_.tmp
  1057. else
  1058. > _shar_wnt_.tmp
  1059. echo 'x - extracting gnuplot/docs/doc2gih.c (Text)'
  1060. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/docs/doc2gih.c' &&
  1061. /*
  1062. X * doc2gih.c  -- program to convert Gnuplot .DOC format to gnuplot
  1063. X * interactive help (.GIH) format.
  1064. X *
  1065. X * This involves stripping all lines with a leading digit or
  1066. X * a leading @, #, or %.
  1067. X * Modified by Russell Lang from hlp2ms.c by Thomas Williams 
  1068. X *
  1069. X * usage:  doc2gih < file.doc > file.gih
  1070. X *
  1071. X * Original version by David Kotz used the following one line script!
  1072. X * sed '/^[0-9@#%]/d' file.doc > file.gih
  1073. X */
  1074. X
  1075. #include <stdio.h>
  1076. #include <ctype.h>
  1077. X
  1078. #define MAX_LINE_LEN    256
  1079. #define TRUE 1
  1080. #define FALSE 0
  1081. X
  1082. main(argc,argv)
  1083. int argc;
  1084. char **argv;
  1085. {
  1086. FILE * infile;
  1087. FILE * outfile;
  1088. X    infile = stdin;
  1089. X    outfile = stdout;
  1090. X    if (argc > 3) {
  1091. X        fprintf(stderr,"Usage: %s infile outfile\n", argv[0]);
  1092. X        exit(1);
  1093. X    }
  1094. X    if (argc >= 2) 
  1095. X        if ( (infile = fopen(argv[1],"r")) == (FILE *)NULL) {
  1096. X            fprintf(stderr,"%s: Can't open %s for reading\n",
  1097. X                argv[0], argv[1]);
  1098. X            exit(1);
  1099. X        }
  1100. X    if (argc == 3)
  1101. X        if ( (outfile = fopen(argv[2],"w")) == (FILE *)NULL) {
  1102. X            fprintf(stderr,"%s: Can't open %s for writing\n",
  1103. X                argv[0], argv[2]);
  1104. X        }
  1105. X    
  1106. X    convert(infile,outfile);
  1107. X    exit(0);
  1108. }
  1109. X
  1110. X
  1111. convert(a,b)
  1112. X    FILE *a,*b;
  1113. {
  1114. X    static char line[MAX_LINE_LEN];
  1115. X
  1116. X    while (fgets(line,MAX_LINE_LEN,a)) {
  1117. X       process_line(line, b);
  1118. X    }
  1119. }
  1120. X
  1121. process_line(line, b)
  1122. X    char *line;
  1123. X    FILE *b;
  1124. {
  1125. X    static int line_count = 0;
  1126. X
  1127. X    line_count++;
  1128. X
  1129. X    switch(line[0]) {        /* control character */
  1130. X       case '?': {            /* interactive help entry */
  1131. X          (void) fputs(line,b); 
  1132. X          break;        
  1133. X       }
  1134. X       case '@': {            /* start/end table */
  1135. X          break;            /* ignore */
  1136. X       }
  1137. X       case '#': {            /* latex table entry */
  1138. X          break;            /* ignore */
  1139. X       }
  1140. X       case '%': {            /* troff table entry */
  1141. X          break;            /* ignore */
  1142. X       }
  1143. X       case '\n':            /* empty text line */
  1144. X       case ' ': {            /* normal text line */
  1145. X          (void) fputs(line,b); 
  1146. X          break;
  1147. X       }
  1148. X       default: {
  1149. X          if (isdigit(line[0])) { /* start of section */
  1150. X                  /* ignore */
  1151. X          } else
  1152. X            fprintf(stderr, "unknown control code '%c' in column 1, line %d\n",
  1153. X                line[0], line_count);
  1154. X          break;
  1155. X       }
  1156. X    }
  1157. }
  1158. X
  1159. SHAR_EOF
  1160. chmod 0666 gnuplot/docs/doc2gih.c ||
  1161. echo 'restore of gnuplot/docs/doc2gih.c failed'
  1162. Wc_c="`wc -c < 'gnuplot/docs/doc2gih.c'`"
  1163. test 2021 -eq "$Wc_c" ||
  1164.     echo 'gnuplot/docs/doc2gih.c: original size 2021, current size' "$Wc_c"
  1165. rm -f _shar_wnt_.tmp
  1166. fi
  1167. # ============= gnuplot/docs/doc2hlp.c ==============
  1168. if test -f 'gnuplot/docs/doc2hlp.c' -a X"$1" != X"-c"; then
  1169.     echo 'x - skipping gnuplot/docs/doc2hlp.c (File already exists)'
  1170.     rm -f _shar_wnt_.tmp
  1171. else
  1172. > _shar_wnt_.tmp
  1173. echo 'x - extracting gnuplot/docs/doc2hlp.c (Text)'
  1174. sed 's/^X//' << 'SHAR_EOF' > 'gnuplot/docs/doc2hlp.c' &&
  1175. /*
  1176. X * doc2hlp.c  -- program to convert Gnuplot .DOC format to 
  1177. X * VMS help (.HLP) format.
  1178. X *
  1179. X * This involves stripping all lines with a leading ?,
  1180. X * @, #, or %.
  1181. X * Modified by Russell Lang from hlp2ms.c by Thomas Williams 
  1182. X *
  1183. X * usage:  doc2hlp < file.doc > file.hlp
  1184. X *
  1185. X * Original version by David Kotz used the following one line script!
  1186. X * sed '/^[?@#%]/d' file.doc > file.hlp
  1187. X */
  1188. X
  1189. #include <stdio.h>
  1190. #include <ctype.h>
  1191. X
  1192. #define MAX_LINE_LEN    256
  1193. #define TRUE 1
  1194. #define FALSE 0
  1195. X
  1196. main()
  1197. {
  1198. X    convert(stdin,stdout);
  1199. X    exit(0);
  1200. }
  1201. X
  1202. X
  1203. convert(a,b)
  1204. X    FILE *a,*b;
  1205. {
  1206. X    static char line[MAX_LINE_LEN];
  1207. X
  1208. X    while (fgets(line,MAX_LINE_LEN,a)) {
  1209. X       process_line(line, b);
  1210. X    }
  1211. }
  1212. X
  1213. process_line(line, b)
  1214. X    char *line;
  1215. X    FILE *b;
  1216. {
  1217. X    static int line_count = 0;
  1218. X
  1219. X    line_count++;
  1220. X
  1221. X    switch(line[0]) {        /* control character */
  1222. X       case '?': {            /* interactive help entry */
  1223. X          break;            /* ignore */
  1224. X       }
  1225. X       case '@': {            /* start/end table */
  1226. X          break;            /* ignore */
  1227. X       }
  1228. X       case '#': {            /* latex table entry */
  1229. X          break;            /* ignore */
  1230. X       }
  1231. X       case '%': {            /* troff table entry */
  1232. X          break;            /* ignore */
  1233. X       }
  1234. X       case '\n':            /* empty text line */
  1235. X       case ' ': {            /* normal text line */
  1236. SHAR_EOF
  1237. true || echo 'restore of gnuplot/docs/doc2hlp.c failed'
  1238. fi
  1239. echo 'End of  part 7'
  1240. echo 'File gnuplot/docs/doc2hlp.c is continued in part 8'
  1241. echo 8 > _shar_seq_.tmp
  1242. exit 0
  1243.  
  1244. exit 0 # Just in case...
  1245. -- 
  1246. Kent Landfield                   INTERNET: kent@sparky.IMD.Sterling.COM
  1247. Sterling Software, IMD           UUCP:     uunet!sparky!kent
  1248. Phone:    (402) 291-8300         FAX:      (402) 291-4362
  1249. Please send comp.sources.misc-related mail to kent@uunet.uu.net.
  1250.