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_uvpack.fp DELETED
@@ -1,246 +0,0 @@
1
- /*
2
- * grph2_uvpack.fp
3
- *
4
- * $Id: grph2_uvpack.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * grph2/uvpack/uverb.f
9
- ****************************************************/
10
- /*
11
- * SUBROUTINE UVERB(N,UPX,UPY1,UPY2)
12
- * REAL UPX(*),UPY1(*),UPY2(*)
13
- */
14
- SUBROUTINE UVERB(
15
- INTEGER N
16
- REAL (N) UPX
17
- REAL (N) UPY1
18
- REAL (N) UPY2
19
- )
20
-
21
- /*****************************************************
22
- * grph2/uvpack/uverbz.f
23
- ****************************************************/
24
- /*
25
- * SUBROUTINE UVERBZ(N,UPX,UPY1,UPY2,ITYPE,INDEX,RSIZE)
26
- * REAL UPX(*),UPY1(*),UPY2(*)
27
- */
28
- SUBROUTINE UVERBZ(
29
- INTEGER N
30
- REAL (N) UPX
31
- REAL (N) UPY1
32
- REAL (N) UPY2
33
- INTEGER ITYPE
34
- INTEGER INDEX
35
- REAL RSIZE
36
- )
37
-
38
- /*****************************************************
39
- * grph2/uvpack/uvdif.f
40
- ****************************************************/
41
- /*
42
- * SUBROUTINE UVDIF(N,UPX,UPY1,UPY2)
43
- * REAL UPX(*),UPY1(*),UPY2(*)
44
- */
45
- SUBROUTINE UVDIF(
46
- INTEGER N
47
- REAL (N) UPX
48
- REAL (N) UPY1
49
- REAL (N) UPY2
50
- )
51
-
52
- /*****************************************************
53
- * grph2/uvpack/uvdifz.f
54
- ****************************************************/
55
- /*
56
- * SUBROUTINE UVDIFZ(N,UPX,UPY1,UPY2,ITPAT1,ITPAT2)
57
- * REAL UPX(*),UPY1(*),UPY2(*)
58
- */
59
- SUBROUTINE UVDIFZ(
60
- INTEGER N
61
- REAL (N) UPX
62
- REAL (N) UPY1
63
- REAL (N) UPY2
64
- INTEGER ITPAT1
65
- INTEGER ITPAT2
66
- )
67
-
68
- /*****************************************************
69
- * grph2/uvpack/uvbrf.f
70
- ****************************************************/
71
- /*
72
- * SUBROUTINE UVBRF(N,UPX,UPY1,UPY2)
73
- * REAL UPX(*),UPY1(*),UPY2(*)
74
- */
75
- SUBROUTINE UVBRF(
76
- INTEGER N
77
- REAL (N) UPX
78
- REAL (N) UPY1
79
- REAL (N) UPY2
80
- )
81
-
82
- /*****************************************************
83
- * grph2/uvpack/uvbrfz.f
84
- ****************************************************/
85
- /*
86
- * SUBROUTINE UVBRFZ(N,UPX,UPY1,UPY2,ITYPE,INDEX,RSIZE)
87
- * REAL UPX(*),UPY1(*),UPY2(*)
88
- */
89
- SUBROUTINE UVBRFZ(
90
- INTEGER N
91
- REAL (N) UPX
92
- REAL (N) UPY1
93
- REAL (N) UPY2
94
- INTEGER ITYPE
95
- INTEGER INDEX
96
- REAL RSIZE
97
- )
98
-
99
- /*****************************************************
100
- * grph2/uvpack/uvbra.f
101
- ****************************************************/
102
- /*
103
- * SUBROUTINE UVBRA(N,UPX,UPY1,UPY2)
104
- * REAL UPX(*),UPY1(*),UPY2(*)
105
- */
106
- SUBROUTINE UVBRA(
107
- INTEGER N
108
- REAL (N) UPX
109
- REAL (N) UPY1
110
- REAL (N) UPY2
111
- )
112
-
113
- /*****************************************************
114
- * grph2/uvpack/uvbraz.f
115
- ****************************************************/
116
- /*
117
- * SUBROUTINE UVBRAZ(N,UPX,UPY1,UPY2,ITPAT1,ITPAT2,RSIZE)
118
- * REAL UPX(*),UPY1(*),UPY2(*)
119
- */
120
- SUBROUTINE UVBRAZ(
121
- INTEGER N
122
- REAL (N) UPX
123
- REAL (N) UPY1
124
- REAL (N) UPY2
125
- INTEGER ITPAT1
126
- INTEGER ITPAT2
127
- REAL RSIZE
128
- )
129
-
130
- /*****************************************************
131
- * grph2/uvpack/uvbrl.f
132
- ****************************************************/
133
- /*
134
- * SUBROUTINE UVBRL(N,UPX,UPY)
135
- * REAL UPX(*),UPY(*)
136
- */
137
- SUBROUTINE UVBRL(
138
- INTEGER N
139
- REAL (N) UPX
140
- REAL (N) UPY
141
- )
142
-
143
- /*****************************************************
144
- * grph2/uvpack/uvbrlz.f
145
- ****************************************************/
146
- /*
147
- * SUBROUTINE UVBRLZ(N,UPX,UPY,ITYPE,INDEX,RSIZE)
148
- * REAL UPX(*),UPY(*)
149
- */
150
- SUBROUTINE UVBRLZ(
151
- INTEGER N
152
- REAL (N) UPX
153
- REAL (N) UPY
154
- INTEGER ITYPE
155
- INTEGER INDEX
156
- REAL RSIZE
157
- )
158
-
159
- /*****************************************************
160
- * grph2/uvpack/uvbxf.f
161
- ****************************************************/
162
- /*
163
- * SUBROUTINE UVBXF(N,UPX,UPY1,UPY2)
164
- * REAL UPX(*),UPY1(*),UPY2(*)
165
- */
166
- SUBROUTINE UVBXF(
167
- INTEGER N
168
- REAL (N+1) UPX
169
- REAL (N) UPY1
170
- REAL (N) UPY2
171
- )
172
-
173
- /*****************************************************
174
- * grph2/uvpack/uvbxfz.f
175
- ****************************************************/
176
- /*
177
- * SUBROUTINE UVBXFZ(N,UPX,UPY1,UPY2,ITYPE,INDEX)
178
- * REAL UPX(*),UPY1(*),UPY2(*)
179
- */
180
- SUBROUTINE UVBXFZ(
181
- INTEGER N
182
- REAL (N+1) UPX
183
- REAL (N) UPY1
184
- REAL (N) UPY2
185
- INTEGER ITYPE
186
- INTEGER INDEX
187
- )
188
-
189
- /*****************************************************
190
- * grph2/uvpack/uvbxa.f
191
- ****************************************************/
192
- /*
193
- * SUBROUTINE UVBXA(N,UPX,UPY1,UPY2)
194
- * REAL UPX(*),UPY1(*),UPY2(*)
195
- */
196
- SUBROUTINE UVBXA(
197
- INTEGER N
198
- REAL (N+1) UPX
199
- REAL (N) UPY1
200
- REAL (N) UPY2
201
- )
202
-
203
- /*****************************************************
204
- * grph2/uvpack/uvbxaz.f
205
- ****************************************************/
206
- /*
207
- * SUBROUTINE UVBXAZ(N,UPX,UPY1,UPY2,ITPAT1,ITPAT2)
208
- * REAL UPX(*),UPY1(*),UPY2(*)
209
- */
210
- SUBROUTINE UVBXAZ(
211
- INTEGER N
212
- REAL (N+1) UPX
213
- REAL (N) UPY1
214
- REAL (N) UPY2
215
- INTEGER ITPAT1
216
- INTEGER ITPAT2
217
- )
218
-
219
- /*****************************************************
220
- * grph2/uvpack/uvbxl.f
221
- ****************************************************/
222
- /*
223
- * SUBROUTINE UVBXL(N,UPX,UPY)
224
- * REAL UPX(*),UPY(*)
225
- */
226
- SUBROUTINE UVBXL(
227
- INTEGER N
228
- REAL (N+1) UPX
229
- REAL (N) UPY
230
- )
231
-
232
- /*****************************************************
233
- * grph2/uvpack/uvbxlz.f
234
- ****************************************************/
235
- /*
236
- * SUBROUTINE UVBXLZ(N,UPX,UPY,ITYPE,INDEX)
237
- * REAL UPX(*),UPY(*)
238
- */
239
- SUBROUTINE UVBXLZ(
240
- INTEGER N
241
- REAL (N+1) UPX
242
- REAL (N) UPY
243
- INTEGER ITYPE
244
- INTEGER INDEX
245
- )
246
-
data/GenWrapper/proto/grph2_uwpack.fp DELETED
@@ -1,203 +0,0 @@
1
- /*
2
- * grph2_uwpack.fp
3
- *
4
- * $Id: grph2_uwpack.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * grph2/uwpack/uwsgxa.f
9
- ****************************************************/
10
- /*
11
- * SUBROUTINE UWSGXA(XP,NX)
12
- * REAL XP(*)
13
- */
14
- SUBROUTINE UWSGXA(
15
- REAL (NX) XP
16
- INTEGER NX
17
- )
18
-
19
- /*
20
- * ENTRY UWQGXA(XP,NX)
21
- * REAL XP(*)
22
- */
23
- SUBROUTINE UWQGXA(
24
- REAL (NX) o XP
25
- INTEGER o NX
26
- )
27
-
28
- /*
29
- * ENTRY UWSGXB(UXMIN,UXMAX,NX)
30
- */
31
- SUBROUTINE UWSGXB(
32
- REAL UXMIN
33
- REAL UXMAX
34
- INTEGER NX
35
- )
36
-
37
- /*
38
- * ENTRY UWQGXB(UXMIN,UXMAX,NX)
39
- */
40
- SUBROUTINE UWQGXB(
41
- REAL o UXMIN
42
- REAL o UXMAX
43
- INTEGER o NX
44
- )
45
-
46
- /*
47
- * ENTRY UWSGXZ(LSETX)
48
- * LOGICAL LSETX
49
- */
50
- SUBROUTINE UWSGXZ(
51
- LOGICAL LSETX
52
- )
53
-
54
- /*
55
- * ENTRY UWQGXZ(LSETX)
56
- * LOGICAL LSETX
57
- */
58
- SUBROUTINE UWQGXZ(
59
- LOGICAL o LSETX
60
- )
61
-
62
- /*****************************************************
63
- * grph2/uwpack/uwsgya.f
64
- ****************************************************/
65
- /*
66
- * SUBROUTINE UWSGYA(YP,NY)
67
- * REAL YP(*)
68
- */
69
- SUBROUTINE UWSGYA(
70
- REAL (NY) YP
71
- INTEGER NY
72
- )
73
-
74
- /*
75
- * ENTRY UWQGYA(YP,NY)
76
- * REAL YP(*)
77
- */
78
- SUBROUTINE UWQGYA(
79
- REAL (NY) o YP
80
- INTEGER o NY
81
- )
82
-
83
- /*
84
- * ENTRY UWSGYB(UYMIN,UYMAX,NY)
85
- */
86
- SUBROUTINE UWSGYB(
87
- REAL UYMIN
88
- REAL UYMAX
89
- INTEGER NY
90
- )
91
-
92
- /*
93
- * ENTRY UWQGYB(UYMIN,UYMAX,NY)
94
- */
95
- SUBROUTINE UWQGYB(
96
- REAL o UYMIN
97
- REAL o UYMAX
98
- INTEGER o NY
99
- )
100
-
101
- /*
102
- * ENTRY UWSGYZ(LSETY)
103
- * LOGICAL LSETY
104
- */
105
- SUBROUTINE UWSGYZ(
106
- LOGICAL LSETY
107
- )
108
-
109
- /*
110
- * ENTRY UWQGYZ(LSETY)
111
- * LOGICAL LSETY
112
- */
113
- SUBROUTINE UWQGYZ(
114
- LOGICAL o LSETY
115
- )
116
-
117
- /*****************************************************
118
- * grph2/uwpack/uwqgxi.f
119
- ****************************************************/
120
- /*
121
- * SUBROUTINE UWQGXI(UX,IUX,FRAC)
122
- */
123
- SUBROUTINE UWQGXI(
124
- REAL UX
125
- INTEGER o IUX
126
- REAL o FRAC
127
- )
128
-
129
- /*
130
- * ENTRY UWIGXI
131
- */
132
- SUBROUTINE UWIGXI(
133
- )
134
-
135
- /*****************************************************
136
- * grph2/uwpack/uwqgyi.f
137
- ****************************************************/
138
- /*
139
- * SUBROUTINE UWQGYI(UY,IUY,FRAC)
140
- */
141
- SUBROUTINE UWQGYI(
142
- REAL UY
143
- INTEGER o IUY
144
- REAL o FRAC
145
- )
146
-
147
- /*
148
- * ENTRY UWIGYI
149
- */
150
- SUBROUTINE UWIGYI(
151
- )
152
-
153
- /*****************************************************
154
- * grph2/uwpack/ruwgx.f
155
- ****************************************************/
156
- /*
157
- * REAL FUNCTION RUWGX(IX)
158
- */
159
- REAL FUNCTION RUWGX(
160
- INTEGER IX
161
- )
162
-
163
- /*****************************************************
164
- * grph2/uwpack/ruwgy.f
165
- ****************************************************/
166
- /*
167
- * REAL FUNCTION RUWGY(IY)
168
- */
169
- REAL FUNCTION RUWGY(
170
- INTEGER IY
171
- )
172
-
173
- /*****************************************************
174
- * grph2/uwpack/iuwgx.f
175
- ****************************************************/
176
- /*
177
- * INTEGER FUNCTION IUWGX(UX)
178
- */
179
- INTEGER FUNCTION IUWGX(
180
- REAL UX
181
- )
182
-
183
- /*****************************************************
184
- * grph2/uwpack/iuwgy.f
185
- ****************************************************/
186
- /*
187
- * INTEGER FUNCTION IUWGY(UY)
188
- */
189
- INTEGER FUNCTION IUWGY(
190
- REAL UY
191
- )
192
-
193
- /*****************************************************
194
- * grph2/uwpack/uwdflt.f
195
- ****************************************************/
196
- /*
197
- * SUBROUTINE UWDFLT(NX,NY)
198
- */
199
- SUBROUTINE UWDFLT(
200
- INTEGER NX
201
- INTEGER NY
202
- )
203
-