ruby-dcl 1.7.1 → 1.8.2

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (327) hide show
  1. checksums.yaml +5 -5
  2. data/ChangeLog +1149 -365
  3. data/LICENSE.txt +1 -1
  4. data/Rakefile +7 -11
  5. data/demo/gokuraku/hop/hop.rb +1 -2
  6. data/demo/gokuraku/jump/jump1.rb +1 -2
  7. data/demo/gokuraku/jump/jump2.rb +2 -3
  8. data/demo/gokuraku/layout/lay1.rb +1 -2
  9. data/demo/gokuraku/layout/lay2.rb +1 -2
  10. data/demo/gokuraku/step/step0.rb +1 -2
  11. data/demo/gokuraku/step/step1.rb +1 -2
  12. data/demo/gokuraku/step/step2.rb +1 -2
  13. data/demo/gokuraku/u1d/u1d1.rb +1 -2
  14. data/demo/gokuraku/u1d/u1d2.rb +1 -2
  15. data/demo/gokuraku/u2d/u2d1.rb +1 -2
  16. data/demo/gokuraku/u2d/u2d2.rb +1 -2
  17. data/demo/gokuraku/u2d/u2d3.rb +1 -2
  18. data/demo/gokuraku/u2d/u2d4.rb +1 -2
  19. data/demo/grph1/scpack/scpkt2.rb +1 -2
  20. data/demo/grph1/scpack/scpkt3.rb +1 -2
  21. data/demo/grph1/scpack/scpkt6.rb +1 -2
  22. data/demo/grph1/scpack/scpkt7.rb +1 -2
  23. data/demo/grph1/scpack/scpkt8.rb +1 -2
  24. data/demo/grph1/sgpack/sgfont.rb +2 -3
  25. data/demo/grph1/sgpack/sgfonz.rb +2 -3
  26. data/demo/grph1/sgpack/sgksx1.rb +1 -2
  27. data/demo/grph1/sgpack/sgksx2.rb +1 -2
  28. data/demo/grph1/sgpack/sgksx3.rb +1 -2
  29. data/demo/grph1/sgpack/sglidx.rb +1 -2
  30. data/demo/grph1/sgpack/sgltyp.rb +1 -2
  31. data/demo/grph1/sgpack/sgpk01.rb +1 -2
  32. data/demo/grph1/sgpack/sgpk02.rb +1 -2
  33. data/demo/grph1/sgpack/sgpk03.rb +1 -2
  34. data/demo/grph1/sgpack/sgpk04.rb +1 -2
  35. data/demo/grph1/sgpack/sgpk05.rb +1 -2
  36. data/demo/grph1/sgpack/sgpk06.rb +1 -2
  37. data/demo/grph1/sgpack/sgpk07.rb +9 -8
  38. data/demo/grph1/sgpack/sgpk08.rb +1 -2
  39. data/demo/grph1/sgpack/sgpk09.rb +1 -2
  40. data/demo/grph1/sgpack/sgpk10.rb +1 -2
  41. data/demo/grph1/sgpack/sgtclr.rb +1 -2
  42. data/demo/grph1/sgpack/sgtone.rb +1 -2
  43. data/demo/grph1/sgpack/sgtonz.rb +1 -2
  44. data/demo/grph1/slpack/slpk01.rb +1 -2
  45. data/demo/grph1/slpack/slpk02.rb +1 -2
  46. data/demo/grph1/slpack/slpk03.rb +1 -2
  47. data/demo/grph1/slpack/slpk04.rb +2 -3
  48. data/demo/grph2/grpack/grpk01.rb +1 -2
  49. data/demo/grph2/ucpack/ucpk01.rb +1 -2
  50. data/demo/grph2/ucpack/ucpk02.rb +1 -2
  51. data/demo/grph2/udegpk/u2df01.rb +1 -2
  52. data/demo/grph2/udegpk/u2df02.rb +1 -2
  53. data/demo/grph2/udegpk/u2df03.rb +3 -4
  54. data/demo/grph2/udegpk/u2df04.rb +1 -2
  55. data/demo/grph2/udegpk/u2df05.rb +1 -2
  56. data/demo/grph2/udegpk/u2df06.rb +1 -2
  57. data/demo/grph2/udegpk/u2df07.rb +1 -2
  58. data/demo/grph2/udegpk/u2df08.rb +1 -2
  59. data/demo/grph2/udegpk/u2df09b.rb +0 -1
  60. data/demo/grph2/udegpk/u2df09c.rb +0 -1
  61. data/demo/grph2/udegpk/u2df09e.rb +0 -1
  62. data/demo/grph2/udegpk/u2df09f.rb +0 -1
  63. data/demo/grph2/uipack/uipk01.rb +1 -2
  64. data/demo/grph2/uipack/uipk02.rb +26 -18
  65. data/demo/grph2/uipack/uipk03.rb +50 -0
  66. data/demo/grph2/ulpack/ulpk01.rb +1 -2
  67. data/demo/grph2/ulpack/ulpk01n.rb +1 -2
  68. data/demo/grph2/ulpack/ulpk02.rb +1 -2
  69. data/demo/grph2/ulpack/ulpk02n.rb +1 -2
  70. data/demo/grph2/umpack/test01.rb +1 -2
  71. data/demo/grph2/umpack/test02.rb +1 -2
  72. data/demo/grph2/umpack/test03.rb +1 -2
  73. data/demo/grph2/umpack/test04.rb +2 -3
  74. data/demo/grph2/umpack/test05.rb +1 -2
  75. data/demo/grph2/umpack/test05r.rb +86 -0
  76. data/demo/grph2/umpack/test06.rb +1 -2
  77. data/demo/grph2/umpack/test07.rb +1 -2
  78. data/demo/grph2/umpack/test08.rb +1 -2
  79. data/demo/grph2/umpack/test10.rb +0 -1
  80. data/demo/grph2/umpack/umpk01.rb +1 -2
  81. data/demo/grph2/umpack/umpk02.rb +1 -2
  82. data/demo/grph2/umpack/umpk03.rb +1 -2
  83. data/demo/grph2/umpack/umpk04.rb +1 -2
  84. data/demo/grph2/umpack/umpk05.rb +1 -2
  85. data/demo/grph2/uspack/uspk01.rb +1 -2
  86. data/demo/grph2/uspack/uspk02.rb +1 -2
  87. data/demo/grph2/uspack/uspk03.rb +1 -2
  88. data/demo/grph2/uspack/uspk04.rb +1 -2
  89. data/demo/grph2/uspack/uspk05.rb +1 -2
  90. data/demo/grph2/uspack/uspk06.rb +2 -3
  91. data/demo/grph2/uspack/uspk07.rb +1 -2
  92. data/demo/grph2/uspack/uspk08.rb +2 -3
  93. data/demo/grph2/uspack/uspk09.rb +1 -2
  94. data/demo/grph2/uspack/uspk10.rb +1 -2
  95. data/demo/grph2/uspack/uspk11.rb +1 -2
  96. data/demo/grph2/uspack/uspk12.rb +1 -2
  97. data/demo/grph2/uupack/uupk01.rb +1 -2
  98. data/demo/grph2/uupack/uupk02.rb +1 -2
  99. data/demo/grph2/uupack/uupk03.rb +1 -2
  100. data/demo/grph2/uupack/uupk04.rb +1 -2
  101. data/demo/grph2/uupack/uupk05.rb +1 -2
  102. data/demo/grph2/uupack/uupk06.rb +1 -2
  103. data/demo/grph2/uupack/uupk07.rb +1 -2
  104. data/demo/grph2/uxyzpk/uxyz01.rb +1 -2
  105. data/demo/grph2/uxyzpk/uxyz02.rb +1 -2
  106. data/demo/grph2/uxyzpk/uxyz03.rb +1 -2
  107. data/demo/grph2/uxyzpk/uxyz04.rb +1 -2
  108. data/demo/grph2/uxyzpk/uxyz05.rb +1 -2
  109. data/demo/grph2/uxyzpk/uxyz06.rb +1 -2
  110. data/demo/grph2/uxyzpk/uxyz07.rb +1 -2
  111. data/demo/grph2/uxyzpk/uxyz08.rb +1 -2
  112. data/demo/grph2/uxyzpk/uxyz09.rb +1 -2
  113. data/demo/grph2/uxyzpk/uxyz10.rb +1 -2
  114. data/demo/grph2/ximage/ximg01.rb +2 -3
  115. data/demo/math1/clsplib/cslb01.rb +1 -2
  116. data/demo/math2/fftlib/fftl01.rb +1 -2
  117. data/demo/math2/fftlib/fftl02.rb +1 -2
  118. data/demo/math2/intrlib/intr01.rb +1 -2
  119. data/demo/math2/rnmlib/rnml01.rb +1 -2
  120. data/demo/math2/vstlib/vstl01.rb +1 -2
  121. data/demo/math2/vstlib/vstl02.rb +1 -2
  122. data/demo/misc2/tmpack/tmpk01.rb +46 -0
  123. data/demo/misc2/tmpack/tmpk02.rb +58 -0
  124. data/demo/misc2/tmpack/tmpk03.rb +56 -0
  125. data/demo/rakuraku/color/color1.rb +1 -2
  126. data/demo/rakuraku/color/color2.rb +5 -5
  127. data/demo/rakuraku/color/color3.rb +1 -2
  128. data/demo/rakuraku/kihon/kihon1.rb +1 -2
  129. data/demo/rakuraku/kihon/kihon2.rb +1 -2
  130. data/demo/rakuraku/kihon/kihon3.rb +1 -2
  131. data/demo/rakuraku/kihon/kihon4.rb +1 -2
  132. data/demo/rakuraku/kihon/kihon5.rb +1 -2
  133. data/demo/rakuraku/kihon/kihon6.rb +1 -2
  134. data/demo/rakuraku/kihon/kihon7.rb +10 -5
  135. data/demo/rakuraku/kihon/kihon8.rb +1 -2
  136. data/demo/rakuraku/kihon/kihon9.rb +1 -2
  137. data/demo/rakuraku/kihon/kihona.rb +1 -2
  138. data/demo/rakuraku/kihon/kihonb.rb +12 -11
  139. data/demo/rakuraku/kihon/kihonc.rb +1 -2
  140. data/demo/rakuraku/layout/lay1.rb +1 -2
  141. data/demo/rakuraku/layout/lay2.rb +1 -2
  142. data/demo/rakuraku/layout/lay3.rb +1 -2
  143. data/demo/rakuraku/map3d/map3d1.rb +1 -2
  144. data/demo/rakuraku/map3d/map3d2.rb +1 -2
  145. data/demo/rakuraku/map3d/map3d3.rb +1 -2
  146. data/demo/rakuraku/map3d/map3d4.rb +1 -2
  147. data/demo/rakuraku/map3d/map3d5.rb +1 -2
  148. data/demo/rakuraku/map3d/map3d6.rb +0 -1
  149. data/demo/rakuraku/map3d/map3d7.rb +0 -1
  150. data/demo/rakuraku/miss/miss1.rb +1 -2
  151. data/demo/rakuraku/miss/miss2.rb +1 -2
  152. data/demo/rakuraku/quick/quick1.rb +1 -2
  153. data/demo/rakuraku/quick/quick2.rb +1 -2
  154. data/demo/rakuraku/quick/quick3.rb +1 -2
  155. data/demo/rakuraku/quick/quick4.rb +1 -2
  156. data/demo/rakuraku/quick/quick5.rb +1 -2
  157. data/demo/rakuraku/u2d/u2d1.rb +1 -2
  158. data/demo/rakuraku/u2d/u2d2.rb +1 -2
  159. data/demo/rakuraku/u2d/u2d3.rb +1 -2
  160. data/demo/rakuraku/u2d/u2d4.rb +1 -2
  161. data/demo/rakuraku/u2d/u2d5.rb +1 -2
  162. data/demo/rakuraku/u2d/u2d6.rb +1 -2
  163. data/demo/rakuraku/u2d/u2d7.rb +1 -2
  164. data/demo/rakuraku/uspack/uspac1.rb +2 -3
  165. data/demo/rakuraku/uspack/uspac2.rb +1 -2
  166. data/demo/rakuraku/uspack/uspac3.rb +2 -3
  167. data/demo/rakuraku/uspack/uspac4.rb +1 -2
  168. data/demo/rakuraku/uxyz/uxyz1.rb +1 -2
  169. data/demo/rakuraku/uxyz/uxyz2.rb +1 -2
  170. data/demo/rakuraku/uxyz/uxyz3.rb +1 -2
  171. data/demo/rakuraku/uxyz/uxyz4.rb +1 -2
  172. data/demo/rakuraku/uxyz/uxyz5.rb +1 -2
  173. data/demo/rakuraku/uxyz/uxyz6.rb +1 -2
  174. data/demo/rakuraku/uxyz/uxyz7.rb +1 -2
  175. data/demo/rakuraku/uxyz/uxyz8.rb +1 -2
  176. data/demo/rubydcloriginal/uemrkz1.rb +0 -1
  177. data/ext/numru/dcl_cary2obj.c +29 -24
  178. data/ext/numru/dcl_narrayed_funcs.c +21 -21
  179. data/ext/numru/dcl_obj2cary.c +9 -5
  180. data/ext/numru/dcl_rubydcloriginal.c +14 -5
  181. data/ext/numru/extconf.rb +73 -61
  182. data/ext/numru/grph1_csgi.c +38 -8
  183. data/ext/numru/grph1_scpack.c +49 -46
  184. data/ext/numru/grph1_sgpack.c +167 -164
  185. data/ext/numru/grph1_slpack.c +23 -20
  186. data/ext/numru/grph1_stpack.c +44 -41
  187. data/ext/numru/grph1_swpack.c +155 -92
  188. data/ext/numru/grph2_grpack.c +22 -19
  189. data/ext/numru/grph2_ucpack.c +55 -52
  190. data/ext/numru/grph2_udpack.c +61 -58
  191. data/ext/numru/grph2_uepack.c +60 -57
  192. data/ext/numru/grph2_ugpack.c +49 -46
  193. data/ext/numru/grph2_uhpack.c +25 -22
  194. data/ext/numru/grph2_uipack.c +57 -54
  195. data/ext/numru/grph2_ulpack.c +59 -56
  196. data/ext/numru/grph2_umpack.c +75 -72
  197. data/ext/numru/grph2_uspack.c +97 -94
  198. data/ext/numru/grph2_uupack.c +78 -75
  199. data/ext/numru/grph2_uvpack.c +25 -22
  200. data/ext/numru/grph2_uwpack.c +30 -27
  201. data/ext/numru/grph2_uxpack.c +23 -20
  202. data/ext/numru/grph2_uypack.c +23 -20
  203. data/ext/numru/grph2_uzpack.c +69 -66
  204. data/ext/numru/init.c.default +6 -2
  205. data/ext/numru/math1_blklib.c +13 -10
  206. data/ext/numru/math1_chrlib.c +16 -13
  207. data/ext/numru/math1_clsplib.c +13 -10
  208. data/ext/numru/math1_fnclib.c +16 -13
  209. data/ext/numru/math1_gnmlib.c +21 -18
  210. data/ext/numru/math1_gt2dlib.c +18 -15
  211. data/ext/numru/math1_ifalib.c +18 -15
  212. data/ext/numru/math1_indxlib.c +24 -21
  213. data/ext/numru/math1_intlib.c +13 -10
  214. data/ext/numru/math1_lrllib.c +33 -30
  215. data/ext/numru/math1_maplib.c +14 -11
  216. data/ext/numru/math1_oslib.c +11 -8
  217. data/ext/numru/math1_rfalib.c +39 -36
  218. data/ext/numru/math1_rfblib.c +12 -9
  219. data/ext/numru/math1_sublib.c +13 -10
  220. data/ext/numru/math1_syslib.c +82 -79
  221. data/ext/numru/math1_vialib.c +31 -28
  222. data/ext/numru/math1_viblib.c +24 -21
  223. data/ext/numru/math1_vralib.c +31 -28
  224. data/ext/numru/math1_vrblib.c +24 -21
  225. data/ext/numru/math1_xfclib.c +12 -9
  226. data/ext/numru/math2_fftlib.c +28 -25
  227. data/ext/numru/math2_intrlib.c +11 -8
  228. data/ext/numru/math2_rnmlib.c +12 -9
  229. data/ext/numru/math2_shtlib.c +34 -31
  230. data/ext/numru/math2_vstlib.c +15 -12
  231. data/ext/numru/misc1_chnlib.c +12 -9
  232. data/ext/numru/misc1_datelib.c +36 -33
  233. data/ext/numru/misc1_fmtlib.c +10 -7
  234. data/ext/numru/misc1_misclib.c +11 -8
  235. data/ext/numru/misc1_randlib.c +13 -10
  236. data/ext/numru/misc1_timelib.c +20 -17
  237. data/ext/numru/misc2_tmpack.c +1200 -0
  238. data/lib/numru/dcl/dcl.rb +5676 -0
  239. data/lib/numru/dcl/version.rb +5 -0
  240. data/lib/numru/dcl.rb +6 -5580
  241. data/ruby-dcl.gemspec +13 -9
  242. metadata +25 -99
  243. data/.gitignore +0 -13
  244. data/.rspec +0 -2
  245. data/.travis.yml +0 -3
  246. data/GenWrapper/Makefile +0 -15
  247. data/GenWrapper/cproto2init.rb +0 -41
  248. data/GenWrapper/dcl_narrayed_funcs.rb +0 -181
  249. data/GenWrapper/dcl_rb_footing +0 -29
  250. data/GenWrapper/dcl_rb_heading +0 -123
  251. data/GenWrapper/def.rb +0 -20
  252. data/GenWrapper/elim_ary_size.rb +0 -398
  253. data/GenWrapper/etc/p_header +0 -64
  254. data/GenWrapper/pparse.rb +0 -137
  255. data/GenWrapper/proto/Makefile +0 -36
  256. data/GenWrapper/proto/grph1_00 +0 -17
  257. data/GenWrapper/proto/grph1_csgi.fp +0 -27
  258. data/GenWrapper/proto/grph1_scpack.fp +0 -442
  259. data/GenWrapper/proto/grph1_sgpack.fp +0 -1772
  260. data/GenWrapper/proto/grph1_slpack.fp +0 -316
  261. data/GenWrapper/proto/grph1_stpack.fp +0 -455
  262. data/GenWrapper/proto/grph1_swpack.fp +0 -826
  263. data/GenWrapper/proto/grph2_00 +0 -16
  264. data/GenWrapper/proto/grph2_grpack.fp +0 -139
  265. data/GenWrapper/proto/grph2_ucpack.fp +0 -522
  266. data/GenWrapper/proto/grph2_udpack.fp +0 -692
  267. data/GenWrapper/proto/grph2_uepack.fp +0 -601
  268. data/GenWrapper/proto/grph2_ugpack.fp +0 -436
  269. data/GenWrapper/proto/grph2_uhpack.fp +0 -246
  270. data/GenWrapper/proto/grph2_uipack.fp +0 -508
  271. data/GenWrapper/proto/grph2_ulpack.fp +0 -516
  272. data/GenWrapper/proto/grph2_umpack.fp +0 -676
  273. data/GenWrapper/proto/grph2_uspack.fp +0 -989
  274. data/GenWrapper/proto/grph2_uupack.fp +0 -663
  275. data/GenWrapper/proto/grph2_uvpack.fp +0 -246
  276. data/GenWrapper/proto/grph2_uwpack.fp +0 -203
  277. data/GenWrapper/proto/grph2_uxpack.fp +0 -295
  278. data/GenWrapper/proto/grph2_uypack.fp +0 -295
  279. data/GenWrapper/proto/grph2_uzpack.fp +0 -574
  280. data/GenWrapper/proto/math1_00 +0 -12
  281. data/GenWrapper/proto/math1_blklib.fp +0 -58
  282. data/GenWrapper/proto/math1_chrlib.fp +0 -83
  283. data/GenWrapper/proto/math1_clsplib.fp +0 -74
  284. data/GenWrapper/proto/math1_fnclib.fp +0 -79
  285. data/GenWrapper/proto/math1_gnmlib.fp +0 -118
  286. data/GenWrapper/proto/math1_gt2dlib.fp +0 -144
  287. data/GenWrapper/proto/math1_ifalib.fp +0 -123
  288. data/GenWrapper/proto/math1_indxlib.fp +0 -222
  289. data/GenWrapper/proto/math1_intlib.fp +0 -46
  290. data/GenWrapper/proto/math1_lrllib.fp +0 -276
  291. data/GenWrapper/proto/math1_maplib.fp +0 -24
  292. data/GenWrapper/proto/math1_oslib.fp +0 -28
  293. data/GenWrapper/proto/math1_rfalib.fp +0 -420
  294. data/GenWrapper/proto/math1_rfblib.fp +0 -51
  295. data/GenWrapper/proto/math1_sublib.fp +0 -60
  296. data/GenWrapper/proto/math1_syslib.fp +0 -767
  297. data/GenWrapper/proto/math1_vialib.fp +0 -339
  298. data/GenWrapper/proto/math1_viblib.fp +0 -264
  299. data/GenWrapper/proto/math1_vralib.fp +0 -339
  300. data/GenWrapper/proto/math1_vrblib.fp +0 -264
  301. data/GenWrapper/proto/math1_xfclib.fp +0 -68
  302. data/GenWrapper/proto/math2_00 +0 -12
  303. data/GenWrapper/proto/math2_fftlib.fp +0 -803
  304. data/GenWrapper/proto/math2_intrlib.fp +0 -32
  305. data/GenWrapper/proto/math2_odelib.fp_notused +0 -568
  306. data/GenWrapper/proto/math2_rnmlib.fp +0 -54
  307. data/GenWrapper/proto/math2_shtlib.fp +0 -1292
  308. data/GenWrapper/proto/math2_vstlib.fp +0 -84
  309. data/GenWrapper/proto/misc1_00 +0 -17
  310. data/GenWrapper/proto/misc1_chnlib.fp +0 -47
  311. data/GenWrapper/proto/misc1_datelib.fp +0 -352
  312. data/GenWrapper/proto/misc1_fmtlib.fp +0 -19
  313. data/GenWrapper/proto/misc1_misclib.fp +0 -26
  314. data/GenWrapper/proto/misc1_randlib.fp +0 -50
  315. data/GenWrapper/proto/misc1_timelib.fp +0 -151
  316. data/GenWrapper/proto2c.rb +0 -13
  317. data/GenWrapper/prototype.rb +0 -209
  318. data/GenWrapper/util.rb +0 -9
  319. data/GenWrapper/variable.rb +0 -671
  320. data/README +0 -29
  321. data/ToDo +0 -2
  322. data/bin/console +0 -14
  323. data/bin/setup +0 -7
  324. data/demo/grph2/ximage/MEMO +0 -23
  325. data/obsolete/README +0 -2
  326. data/obsolete/dcl_ext.html +0 -112
  327. data/obsolete/dcl_ext.rb +0 -313
data/GenWrapper/proto/grph2_uxpack.fp DELETED
@@ -1,295 +0,0 @@
1
- /*
2
- * grph2_uxpack.fp
3
- *
4
- * $Id: grph2_uxpack.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * grph2/uxpack/uxptmz.f
9
- ****************************************************/
10
- /*
11
- * SUBROUTINE UXPTMZ(UX,N,UPY,ROFFX,RTICK,INDEX)
12
- * REAL UX(*)
13
- */
14
- /*
15
- SUBROUTINE UXPTMZ(
16
- REAL (N) UX
17
- INTEGER N
18
- REAL UPY
19
- REAL ROFFX
20
- REAL RTICK
21
- INTEGER INDEX
22
- )
23
- */
24
-
25
- /*****************************************************
26
- * grph2/uxpack/uxplba.f
27
- ****************************************************/
28
- /*
29
- * SUBROUTINE UXPLBA(UX,CH,NC,N,UPY,ROFFX,RSIZE,IROTA,ICENT,INDEX)
30
- * REAL UX(*)
31
- * CHARACTER CH(*)*(*)
32
- */
33
- /*
34
- SUBROUTINE UXPLBA(
35
- REAL (N) UX
36
- CHARACTER*(*) (N) CH
37
- INTEGER NC
38
- INTEGER N
39
- REAL UPY
40
- REAL ROFFX
41
- REAL RSIZE
42
- INTEGER IROTA
43
- INTEGER ICENT
44
- INTEGER INDEX
45
- )
46
- */
47
-
48
- /*****************************************************
49
- * grph2/uxpack/uxplbb.f
50
- ****************************************************/
51
- /*
52
- * SUBROUTINE UXPLBB(UX,CH,NC,N,UPY,ROFFX,RSIZE,IROTA,ICENT,INDEX,
53
- * + RBTWN,LBOUND,LBMSG)
54
- * REAL UX(*)
55
- * CHARACTER CH(*)*(*)
56
- * LOGICAL LBOUND,LBMSG
57
- */
58
- /*
59
- SUBROUTINE UXPLBB(
60
- REAL (N) UX
61
- CHARACTER*(*) (N) CH
62
- INTEGER NC
63
- INTEGER N
64
- REAL UPY
65
- REAL ROFFX
66
- REAL RSIZE
67
- INTEGER IROTA
68
- INTEGER ICENT
69
- INTEGER INDEX
70
- REAL RBTWN
71
- LOGICAL LBOUND
72
- LOGICAL LBMSG
73
- )
74
- */
75
-
76
- /*****************************************************
77
- * grph2/uxpack/uxsaxz.f
78
- ****************************************************/
79
- /*
80
- * SUBROUTINE UXSAXZ(CSIDE,ROFFX)
81
- * CHARACTER CSIDE*1
82
- */
83
- SUBROUTINE UXSAXZ(
84
- CHARACTER*1 CSIDE
85
- REAL ROFFX
86
- )
87
-
88
- /*****************************************************
89
- * grph2/uxpack/uxsaxs.f
90
- ****************************************************/
91
- /*
92
- * SUBROUTINE UXSAXS(CSIDE)
93
- * CHARACTER CSIDE*1
94
- */
95
- SUBROUTINE UXSAXS(
96
- CHARACTER*1 CSIDE
97
- )
98
-
99
- /*****************************************************
100
- * grph2/uxpack/uxsoff.f
101
- ****************************************************/
102
- /*
103
- * SUBROUTINE UXSOFF
104
- */
105
- /*
106
- SUBROUTINE UXSOFF(
107
- )
108
- */
109
-
110
- /*
111
- * ENTRY UXROFF
112
- */
113
- /*
114
- SUBROUTINE UXROFF(
115
- )
116
- */
117
-
118
- /*****************************************************
119
- * grph2/uxpack/uxpaxs.f
120
- ****************************************************/
121
- /*
122
- * SUBROUTINE UXPAXS(CSIDE,ISLCT)
123
- * CHARACTER CSIDE*1
124
- */
125
- SUBROUTINE UXPAXS(
126
- CHARACTER*1 CSIDE
127
- INTEGER ISLCT
128
- )
129
-
130
- /*****************************************************
131
- * grph2/uxpack/uxptmk.f
132
- ****************************************************/
133
- /*
134
- * SUBROUTINE UXPTMK(CSIDE,ISLCT,UX,N)
135
- * CHARACTER CSIDE*1
136
- * REAL UX(*)
137
- */
138
- SUBROUTINE UXPTMK(
139
- CHARACTER*1 CSIDE
140
- INTEGER ISLCT
141
- REAL (N) UX
142
- INTEGER N
143
- )
144
-
145
- /*****************************************************
146
- * grph2/uxpack/uxplbl.f
147
- ****************************************************/
148
- /*
149
- * SUBROUTINE UXPLBL(CSIDE,ISLCT,UX,CH,NC,N)
150
- * CHARACTER CSIDE*1,CH(*)*(*)
151
- * REAL UX(*)
152
- */
153
- SUBROUTINE UXPLBL(
154
- CHARACTER*1 CSIDE
155
- INTEGER ISLCT
156
- REAL (N) UX
157
- CHARACTER*(*) (N) CH
158
- INTEGER NC
159
- INTEGER N
160
- )
161
-
162
- /*****************************************************
163
- * grph2/uxpack/uxpnum.f
164
- ****************************************************/
165
- /*
166
- * SUBROUTINE UXPNUM(CSIDE,ISLCT,UX,N)
167
- * CHARACTER CSIDE*1
168
- * REAL UX(*)
169
- */
170
- SUBROUTINE UXPNUM(
171
- CHARACTER*1 CSIDE
172
- INTEGER ISLCT
173
- REAL (N) UX
174
- INTEGER N
175
- )
176
-
177
- /*****************************************************
178
- * grph2/uxpack/uxpttl.f
179
- ****************************************************/
180
- /*
181
- * SUBROUTINE UXPTTL(CSIDE,ISLCT,CTTL,PX)
182
- * CHARACTER CSIDE*1,CTTL*(*)
183
- */
184
- SUBROUTINE UXPTTL(
185
- CHARACTER*1 CSIDE
186
- INTEGER ISLCT
187
- CHARACTER*(*) CTTL
188
- REAL PX
189
- )
190
-
191
- /*****************************************************
192
- * grph2/uxpack/uxaxlb.f
193
- ****************************************************/
194
- /*
195
- * SUBROUTINE UXAXLB(CSIDE,UX1,N1,UX2,CH,NC,N2)
196
- * CHARACTER CSIDE*1,CH(*)*(*)
197
- * REAL UX1(*),UX2(*)
198
- */
199
- SUBROUTINE UXAXLB(
200
- CHARACTER*1 CSIDE
201
- REAL (N1) UX1
202
- INTEGER N1
203
- REAL (N2) UX2
204
- CHARACTER*(*) (N2) CH
205
- INTEGER NC
206
- INTEGER N2
207
- )
208
-
209
- /*****************************************************
210
- * grph2/uxpack/uxaxnm.f
211
- ****************************************************/
212
- /*
213
- * SUBROUTINE UXAXNM(CSIDE,UX1,N1,UX2,N2)
214
- * CHARACTER CSIDE*1
215
- * REAL UX1(*),UX2(*)
216
- */
217
- SUBROUTINE UXAXNM(
218
- CHARACTER*1 CSIDE
219
- REAL (N1) UX1
220
- INTEGER N1
221
- REAL (N2) UX2
222
- INTEGER N2
223
- )
224
-
225
- /*****************************************************
226
- * grph2/uxpack/uxaxdv.f
227
- ****************************************************/
228
- /*
229
- * SUBROUTINE UXAXDV(CSIDE,DX1,DX2)
230
- * CHARACTER CSIDE*1
231
- */
232
- SUBROUTINE UXAXDV(
233
- CHARACTER*1 CSIDE
234
- REAL DX1
235
- REAL DX2
236
- )
237
-
238
- /*****************************************************
239
- * grph2/uxpack/uxmttl.f
240
- ****************************************************/
241
- /*
242
- * SUBROUTINE UXMTTL(CSIDE,CTTL,PX)
243
- * CHARACTER CSIDE*1,CTTL*(*)
244
- */
245
- SUBROUTINE UXMTTL(
246
- CHARACTER*1 CSIDE
247
- CHARACTER*(*) CTTL
248
- REAL PX
249
- )
250
-
251
- /*****************************************************
252
- * grph2/uxpack/uxsttl.f
253
- ****************************************************/
254
- /*
255
- * SUBROUTINE UXSTTL(CSIDE,CTTL,PX)
256
- * CHARACTER CSIDE*1,CTTL*(*)
257
- */
258
- SUBROUTINE UXSTTL(
259
- CHARACTER*1 CSIDE
260
- CHARACTER*(*) CTTL
261
- REAL PX
262
- )
263
-
264
- /*****************************************************
265
- * grph2/uxpack/luxchk.f
266
- ****************************************************/
267
- /*
268
- * LOGICAL FUNCTION LUXCHK(CSIDE)
269
- * CHARACTER CSIDE*(*)
270
- */
271
- /*
272
- LOGICAL FUNCTION LUXCHK(
273
- CHARACTER*(*) CSIDE
274
- )
275
- */
276
-
277
- /*****************************************************
278
- * grph2/uxpack/uxsfmt.f
279
- ****************************************************/
280
- /*
281
- * SUBROUTINE UXSFMT(CFMT)
282
- * CHARACTER CFMT*(*)
283
- */
284
- SUBROUTINE UXSFMT(
285
- CHARACTER*(*) CFMT
286
- )
287
-
288
- /*
289
- * ENTRY UXQFMT(CFMT)
290
- * CHARACTER CFMT*(*)
291
- */
292
- SUBROUTINE UXQFMT(
293
- CHARACTER*(*) o CFMT
294
- )
295
-
data/GenWrapper/proto/grph2_uypack.fp DELETED
@@ -1,295 +0,0 @@
1
- /*
2
- * grph2_uypack.fp
3
- *
4
- * $Id: grph2_uypack.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * grph2/uypack/uyptmz.f
9
- ****************************************************/
10
- /*
11
- * SUBROUTINE UYPTMZ(UY,N,UPX,ROFFY,RTICK,INDEX)
12
- * REAL UY(*)
13
- */
14
- /*
15
- SUBROUTINE UYPTMZ(
16
- REAL (N) UY
17
- INTEGER N
18
- REAL UPX
19
- REAL ROFFY
20
- REAL RTICK
21
- INTEGER INDEX
22
- )
23
- */
24
-
25
- /*****************************************************
26
- * grph2/uypack/uyplba.f
27
- ****************************************************/
28
- /*
29
- * SUBROUTINE UYPLBA(UY,CH,NC,N,UPX,ROFFY,RSIZE,IROTA,ICENT,INDEX)
30
- * REAL UY(*)
31
- * CHARACTER CH(*)*(*)
32
- */
33
- /*
34
- SUBROUTINE UYPLBA(
35
- REAL (N) UY
36
- CHARACTER*(*) (N) CH
37
- INTEGER NC
38
- INTEGER N
39
- REAL UPX
40
- REAL ROFFY
41
- REAL RSIZE
42
- INTEGER IROTA
43
- INTEGER ICENT
44
- INTEGER INDEX
45
- )
46
- */
47
-
48
- /*****************************************************
49
- * grph2/uypack/uyplbb.f
50
- ****************************************************/
51
- /*
52
- * SUBROUTINE UYPLBB(UY,CH,NC,N,UPX,ROFFY,RSIZE,IROTA,ICENT,INDEX,
53
- * + RBTWN,LBOUND,LBMSG)
54
- * REAL UY(*)
55
- * CHARACTER CH(*)*(*)
56
- * LOGICAL LBOUND,LBMSG
57
- */
58
- /*
59
- SUBROUTINE UYPLBB(
60
- REAL (N) UY
61
- CHARACTER*(*) (N) CH
62
- INTEGER NC
63
- INTEGER N
64
- REAL UPX
65
- REAL ROFFY
66
- REAL RSIZE
67
- INTEGER IROTA
68
- INTEGER ICENT
69
- INTEGER INDEX
70
- REAL RBTWN
71
- LOGICAL LBOUND
72
- LOGICAL LBMSG
73
- )
74
- */
75
-
76
- /*****************************************************
77
- * grph2/uypack/uysaxz.f
78
- ****************************************************/
79
- /*
80
- * SUBROUTINE UYSAXZ(CSIDE,ROFFY)
81
- * CHARACTER CSIDE*1
82
- */
83
- SUBROUTINE UYSAXZ(
84
- CHARACTER*1 CSIDE
85
- REAL ROFFY
86
- )
87
-
88
- /*****************************************************
89
- * grph2/uypack/uysaxs.f
90
- ****************************************************/
91
- /*
92
- * SUBROUTINE UYSAXS(CSIDE)
93
- * CHARACTER CSIDE*1
94
- */
95
- SUBROUTINE UYSAXS(
96
- CHARACTER*1 CSIDE
97
- )
98
-
99
- /*****************************************************
100
- * grph2/uypack/uysoff.f
101
- ****************************************************/
102
- /*
103
- * SUBROUTINE UYSOFF
104
- */
105
- /*
106
- SUBROUTINE UYSOFF(
107
- )
108
- */
109
-
110
- /*
111
- * ENTRY UYROFF
112
- */
113
- /*
114
- SUBROUTINE UYROFF(
115
- )
116
- */
117
-
118
- /*****************************************************
119
- * grph2/uypack/uypaxs.f
120
- ****************************************************/
121
- /*
122
- * SUBROUTINE UYPAXS(CSIDE,ISLCT)
123
- * CHARACTER CSIDE*1
124
- */
125
- SUBROUTINE UYPAXS(
126
- CHARACTER*1 CSIDE
127
- INTEGER ISLCT
128
- )
129
-
130
- /*****************************************************
131
- * grph2/uypack/uyptmk.f
132
- ****************************************************/
133
- /*
134
- * SUBROUTINE UYPTMK(CSIDE,ISLCT,UY,N)
135
- * CHARACTER CSIDE*1
136
- * REAL UY(*)
137
- */
138
- SUBROUTINE UYPTMK(
139
- CHARACTER*1 CSIDE
140
- INTEGER ISLCT
141
- REAL (N) UY
142
- INTEGER N
143
- )
144
-
145
- /*****************************************************
146
- * grph2/uypack/uyplbl.f
147
- ****************************************************/
148
- /*
149
- * SUBROUTINE UYPLBL(CSIDE,ISLCT,UY,CH,NC,N)
150
- * CHARACTER CSIDE*1,CH(*)*(*)
151
- * REAL UY(*)
152
- */
153
- SUBROUTINE UYPLBL(
154
- CHARACTER*1 CSIDE
155
- INTEGER ISLCT
156
- REAL (N) UY
157
- CHARACTER*(*) (N) CH
158
- INTEGER NC
159
- INTEGER N
160
- )
161
-
162
- /*****************************************************
163
- * grph2/uypack/uypnum.f
164
- ****************************************************/
165
- /*
166
- * SUBROUTINE UYPNUM(CSIDE,ISLCT,UY,N)
167
- * CHARACTER CSIDE*1
168
- * REAL UY(*)
169
- */
170
- SUBROUTINE UYPNUM(
171
- CHARACTER*1 CSIDE
172
- INTEGER ISLCT
173
- REAL (N) UY
174
- INTEGER N
175
- )
176
-
177
- /*****************************************************
178
- * grph2/uypack/uypttl.f
179
- ****************************************************/
180
- /*
181
- * SUBROUTINE UYPTTL(CSIDE,ISLCT,CTTL,PX)
182
- * CHARACTER CSIDE*1,CTTL*(*)
183
- */
184
- SUBROUTINE UYPTTL(
185
- CHARACTER*1 CSIDE
186
- INTEGER ISLCT
187
- CHARACTER*(*) CTTL
188
- REAL PX
189
- )
190
-
191
- /*****************************************************
192
- * grph2/uypack/uyaxlb.f
193
- ****************************************************/
194
- /*
195
- * SUBROUTINE UYAXLB(CSIDE,UY1,N1,UY2,CH,NC,N2)
196
- * CHARACTER CSIDE*1,CH(*)*(*)
197
- * REAL UY1(*),UY2(*)
198
- */
199
- SUBROUTINE UYAXLB(
200
- CHARACTER*1 CSIDE
201
- REAL (N1) UY1
202
- INTEGER N1
203
- REAL (N2) UY2
204
- CHARACTER*(*) (N2) CH
205
- INTEGER NC
206
- INTEGER N2
207
- )
208
-
209
- /*****************************************************
210
- * grph2/uypack/uyaxnm.f
211
- ****************************************************/
212
- /*
213
- * SUBROUTINE UYAXNM(CSIDE,UY1,N1,UY2,N2)
214
- * CHARACTER CSIDE*1
215
- * REAL UY1(*),UY2(*)
216
- */
217
- SUBROUTINE UYAXNM(
218
- CHARACTER*1 CSIDE
219
- REAL (N1) UY1
220
- INTEGER N1
221
- REAL (N2) UY2
222
- INTEGER N2
223
- )
224
-
225
- /*****************************************************
226
- * grph2/uypack/uyaxdv.f
227
- ****************************************************/
228
- /*
229
- * SUBROUTINE UYAXDV(CSIDE,DY1,DY2)
230
- * CHARACTER CSIDE*1
231
- */
232
- SUBROUTINE UYAXDV(
233
- CHARACTER*1 CSIDE
234
- REAL DY1
235
- REAL DY2
236
- )
237
-
238
- /*****************************************************
239
- * grph2/uypack/uymttl.f
240
- ****************************************************/
241
- /*
242
- * SUBROUTINE UYMTTL(CSIDE,CTTL,PX)
243
- * CHARACTER CSIDE*1,CTTL*(*)
244
- */
245
- SUBROUTINE UYMTTL(
246
- CHARACTER*1 CSIDE
247
- CHARACTER*(*) CTTL
248
- REAL PX
249
- )
250
-
251
- /*****************************************************
252
- * grph2/uypack/uysttl.f
253
- ****************************************************/
254
- /*
255
- * SUBROUTINE UYSTTL(CSIDE,CTTL,PX)
256
- * CHARACTER CSIDE*1,CTTL*(*)
257
- */
258
- SUBROUTINE UYSTTL(
259
- CHARACTER*1 CSIDE
260
- CHARACTER*(*) CTTL
261
- REAL PX
262
- )
263
-
264
- /*****************************************************
265
- * grph2/uypack/luychk.f
266
- ****************************************************/
267
- /*
268
- * LOGICAL FUNCTION LUYCHK(CSIDE)
269
- * CHARACTER CSIDE*(*)
270
- */
271
- /*
272
- LOGICAL FUNCTION LUYCHK(
273
- CHARACTER*(*) CSIDE
274
- )
275
- */
276
-
277
- /*****************************************************
278
- * grph2/uypack/uysfmt.f
279
- ****************************************************/
280
- /*
281
- * SUBROUTINE UYSFMT(CFMT)
282
- * CHARACTER CFMT*(*)
283
- */
284
- SUBROUTINE UYSFMT(
285
- CHARACTER*(*) CFMT
286
- )
287
-
288
- /*
289
- * ENTRY UYQFMT(CFMT)
290
- * CHARACTER CFMT*(*)
291
- */
292
- SUBROUTINE UYQFMT(
293
- CHARACTER*(*) o CFMT
294
- )
295
-