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_uipack.fp DELETED
@@ -1,508 +0,0 @@
1
- /*
2
- * grph2_uipack.fp
3
- *
4
- * $Id: grph2_uipack.fp,v 1.3 2012/03/08 05:16:17 koshiro Exp $
5
- */
6
-
7
- #if DCLVER >= 544
8
-
9
- /*****************************************************
10
- * grph2/uipack/uipdat.f
11
- ****************************************************/
12
- /*
13
- * SUBROUTINE UIPDAT(Z, MX, NX, NY)
14
- * REAL Z(MX,*)
15
- */
16
- SUBROUTINE UIPDAT(
17
- REAL (MX,NY) Z
18
- INTEGER MX
19
- INTEGER NX
20
- INTEGER NY
21
- )
22
-
23
- /*****************************************************
24
- * grph2/uipack/uipda2.f
25
- ****************************************************/
26
- /*
27
- * SUBROUTINE UIPDA2(U, V, MX, NX, NY)
28
- * REAL U(MX, *), V(MX, *)
29
- */
30
- SUBROUTINE UIPDA2(
31
- REAL (MX,NY) U
32
- REAL (MX,NY) V
33
- INTEGER MX
34
- INTEGER NX
35
- INTEGER NY
36
- )
37
-
38
- /*****************************************************
39
- * grph2/uipack/uipda3.f
40
- ****************************************************/
41
- /*
42
- * SUBROUTINE UIPDA3(U, V, W, MX, NX, NY)
43
- * REAL U(MX, *), V(MX, *), W(MX, *)
44
- */
45
- SUBROUTINE UIPDA3(
46
- REAL (MX,NY) U
47
- REAL (MX,NY) V
48
- REAL (MX,NY) W
49
- INTEGER MX
50
- INTEGER NX
51
- INTEGER NY
52
- )
53
-
54
- /*****************************************************
55
- * grph2/uipack/uicrgb.f
56
- ****************************************************/
57
- /*
58
- * ENTRY UISCRG(ZMIN, ZMAX)
59
- */
60
- SUBROUTINE UISCRG(
61
- REAL ZMIN
62
- REAL ZMAX
63
- )
64
-
65
- /*
66
- * ENTRY UISMRG(ZMIN, ZMAX)
67
- */
68
- SUBROUTINE UISMRG(
69
- REAL ZMIN
70
- REAL ZMAX
71
- )
72
-
73
- /*
74
- * ENTRY UISCSQ(CLRLVL, ICOLOR, N)
75
- * DIMENSION ICOLOR(*), CLRLVL(*)
76
- */
77
- SUBROUTINE UISCSQ(
78
- REAL (N) CLRLVL
79
- INTEGER (N) ICOLOR
80
- INTEGER N
81
- )
82
-
83
- /*
84
- * ENTRY UISCFL(CDSN)
85
- * CHARACTER CDSN*(*)
86
- */
87
- SUBROUTINE UISCFL(
88
- CHARACTER*(*) CDSN
89
- )
90
-
91
- /*
92
- * ENTRY UISMSQ(SHDLVL, SHADE, N)
93
- * DIMENSION SHADE(*), SHDLVL(*)
94
- */
95
- SUBROUTINE UISMSQ(
96
- REAL (N) SHDLVL
97
- INTEGER (N) SHADE
98
- INTEGER N
99
- )
100
-
101
- /*
102
- * ENTRY UISMFL(CDSN)
103
- * CHARACTER CDSN*(*)
104
- */
105
- SUBROUTINE UISMFL(
106
- CHARACTER*(*) CDSN
107
- )
108
-
109
- /*****************************************************
110
- * grph2/uipack/uixbar.f
111
- ****************************************************/
112
- /*
113
- * SUBROUTINE UIXBAR(XMIN,XMAX,YMIN,YMAX,ZMIN,ZMAX,CPOS)
114
- * CHARACTER CPOS*(*)
115
- */
116
- SUBROUTINE UIXBAR(
117
- REAL XMIN
118
- REAL XMAX
119
- REAL YMIN
120
- REAL YMAX
121
- REAL ZMIN
122
- REAL ZMAX
123
- CHARACTER*(*) CPOS
124
- )
125
-
126
- /*****************************************************
127
- * grph2/uipack/uiybar.f
128
- ****************************************************/
129
- /*
130
- * SUBROUTINE UIYBAR(XMIN,XMAX,YMIN,YMAX,ZMIN,ZMAX,CPOS)
131
- * CHARACTER CPOS*(*)
132
- */
133
- SUBROUTINE UIYBAR(
134
- REAL XMIN
135
- REAL XMAX
136
- REAL YMIN
137
- REAL YMAX
138
- REAL ZMIN
139
- REAL ZMAX
140
- CHARACTER*(*) CPOS
141
- )
142
-
143
- /*****************************************************
144
- * grph2/uipack/uic2d.f
145
- ****************************************************/
146
- /*
147
- * ENTRY UISCR2(UMIN, UMAX, VMIN, VMAX)
148
- */
149
- SUBROUTINE UISCR2(
150
- REAL UMIN
151
- REAL UMAX
152
- REAL VMIN
153
- REAL VMAX
154
- )
155
-
156
- /*
157
- * ENTRY UIQCR2(UMIN, UMAX, VMIN, VMAX)
158
- */
159
- SUBROUTINE UIQCR2(
160
- REAL o UMIN
161
- REAL o UMAX
162
- REAL o VMIN
163
- REAL o VMAX
164
- )
165
-
166
- /*
167
- * ENTRY UISCMP(IRGB1, IRGB2, IRGB3, IRGB4)
168
- */
169
- SUBROUTINE UISCMP(
170
- INTEGER IRGB1
171
- INTEGER IRGB2
172
- INTEGER IRGB3
173
- INTEGER IRGB4
174
- )
175
-
176
- /*****************************************************
177
- * grph2/uipack/uipcmp.f
178
- ****************************************************/
179
- /*
180
- * SUBROUTINE UIPCMP(XMIN,XMAX,YMIN,YMAX,CPOS)
181
- * CHARACTER*(*) CPOS
182
- */
183
- SUBROUTINE UIPCMP(
184
- REAL XMIN
185
- REAL XMAX
186
- REAL YMIN
187
- REAL YMAX
188
- CHARACTER*(*) CPOS
189
- )
190
-
191
- /*****************************************************
192
- * grph2/uipack/uifpac.f
193
- ****************************************************/
194
- /*
195
- * SUBROUTINE UIFPAC(IR, IG, IB, IRGB)
196
- */
197
- SUBROUTINE UIFPAC(
198
- INTEGER IR
199
- INTEGER IG
200
- INTEGER IB
201
- INTEGER o IRGB
202
- )
203
-
204
- /*
205
- * ENTRY UIIPAC(IRGB, IR, IG, IB)
206
- */
207
- SUBROUTINE UIIPAC(
208
- INTEGER IRGB
209
- INTEGER o IR
210
- INTEGER o IG
211
- INTEGER o IB
212
- )
213
-
214
- /*****************************************************
215
- * grph2/uipack/uiiget.f
216
- ****************************************************/
217
- /*
218
- * SUBROUTINE UIIGET(CP, IPARA)
219
- * CHARACTER CP*(*)
220
- */
221
- SUBROUTINE UIIGET(
222
- CHARACTER*(*) CP
223
- INTEGER o IPARA
224
- )
225
-
226
- /*
227
- * ENTRY UIISET(CP, IPARA)
228
- * CHARACTER CP*(*)
229
- */
230
- SUBROUTINE UIISET(
231
- CHARACTER*(*) CP
232
- INTEGER IPARA
233
- )
234
-
235
- /*
236
- * ENTRY UIISTX(CP, IPARA)
237
- * CHARACTER CP*(*)
238
- */
239
- SUBROUTINE UIISTX(
240
- CHARACTER*(*) CP
241
- INTEGER IPARA
242
- )
243
-
244
- /*****************************************************
245
- * grph2/uipack/uiiqnp.f
246
- ****************************************************/
247
- /*
248
- * SUBROUTINE UIIQNP(NCP)
249
- */
250
- SUBROUTINE UIIQNP(
251
- INTEGER o NCP
252
- )
253
-
254
- /*
255
- * ENTRY UIIQID(CP, IDX)
256
- * CHARACTER CP*(*)
257
- */
258
- SUBROUTINE UIIQID(
259
- CHARACTER*(*) CP
260
- INTEGER o IDX
261
- )
262
-
263
- /*
264
- * ENTRY UIIQCP(IDX, CP)
265
- * CHARACTER CP*(*)
266
- */
267
- SUBROUTINE UIIQCP(
268
- INTEGER IDX
269
- CHARACTER*(*) o CP
270
- )
271
-
272
- /*
273
- * ENTRY UIIQCL(IDX, CP)
274
- * CHARACTER CP*(*)
275
- */
276
- SUBROUTINE UIIQCL(
277
- INTEGER IDX
278
- CHARACTER*(*) o CP
279
- )
280
-
281
- /*
282
- * ENTRY UIIQVL(IDX, IPARA)
283
- */
284
- SUBROUTINE UIIQVL(
285
- INTEGER IDX
286
- INTEGER o IPARA
287
- )
288
-
289
- /*
290
- * ENTRY UIISVL(IDX, IPARA)
291
- */
292
- SUBROUTINE UIISVL(
293
- INTEGER IDX
294
- INTEGER IPARA
295
- )
296
-
297
- /*
298
- * ENTRY UIIQIN(CP, IN)
299
- * CHARACTER CP*(*)
300
- */
301
- SUBROUTINE UIIQIN(
302
- CHARACTER*(*) CP
303
- INTEGER o IN
304
- )
305
-
306
- /*****************************************************
307
- * grph2/uipack/uilget.f
308
- ****************************************************/
309
- /*
310
- * SUBROUTINE UILGET(CP, LPARA)
311
- * CHARACTER CP*(*)
312
- * LOGICAL LPARA
313
- */
314
- SUBROUTINE UILGET(
315
- CHARACTER*(*) CP
316
- LOGICAL o LPARA
317
- )
318
-
319
- /*
320
- * ENTRY UILSET(CP, LPARA)
321
- * CHARACTER CP*(*)
322
- * LOGICAL LPARA
323
- */
324
- SUBROUTINE UILSET(
325
- CHARACTER*(*) CP
326
- LOGICAL LPARA
327
- )
328
-
329
- /*
330
- * ENTRY UILSTX(CP, LPARA)
331
- * CHARACTER CP*(*)
332
- * LOGICAL LPARA
333
- */
334
- SUBROUTINE UILSTX(
335
- CHARACTER*(*) CP
336
- LOGICAL LPARA
337
- )
338
-
339
- /*****************************************************
340
- * grph2/uipack/uilqnp.f
341
- ****************************************************/
342
- /*
343
- * SUBROUTINE UILQNP(NCP)
344
- */
345
- SUBROUTINE UILQNP(
346
- INTEGER o NCP
347
- )
348
-
349
- /*
350
- * ENTRY UILQID(CP, IDX)
351
- * CHARACTER CP*(*)
352
- */
353
- SUBROUTINE UILQID(
354
- CHARACTER*(*) CP
355
- INTEGER o IDX
356
- )
357
-
358
- /*
359
- * ENTRY UILQCP(IDX, CP)
360
- * CHARACTER CP*(*)
361
- */
362
- SUBROUTINE UILQCP(
363
- INTEGER IDX
364
- CHARACTER*(*) o CP
365
- )
366
-
367
- /*
368
- * ENTRY UILQCL(IDX, CP)
369
- * CHARACTER CP*(*)
370
- */
371
- SUBROUTINE UILQCL(
372
- INTEGER IDX
373
- CHARACTER*(*) o CP
374
- )
375
-
376
- /*
377
- * ENTRY UILQVL(IDX, LPARA)
378
- * LOGICAL LPARA
379
- */
380
- SUBROUTINE UILQVL(
381
- INTEGER IDX
382
- LOGICAL o LPARA
383
- )
384
-
385
- /*
386
- * ENTRY UILSVL(IDX, LPARA)
387
- * LOGICAL LPARA
388
- */
389
- SUBROUTINE UILSVL(
390
- INTEGER IDX
391
- LOGICAL LPARA
392
- )
393
-
394
- /*
395
- * ENTRY UILQIN(CP, IN)
396
- * CHARACTER CP*(*)
397
- */
398
- SUBROUTINE UILQIN(
399
- CHARACTER*(*) CP
400
- INTEGER o IN
401
- )
402
-
403
- /*****************************************************
404
- * grph2/uipack/uirget.f
405
- ****************************************************/
406
- /*
407
- * SUBROUTINE UIRGET(CP, RPARA)
408
- * CHARACTER CP*(*)
409
- */
410
- SUBROUTINE UIRGET(
411
- CHARACTER*(*) CP
412
- REAL o RPARA
413
- )
414
-
415
- /*
416
- * ENTRY UIRSET(CP, RPARA)
417
- * CHARACTER CP*(*)
418
- */
419
- SUBROUTINE UIRSET(
420
- CHARACTER*(*) CP
421
- REAL RPARA
422
- )
423
-
424
- /*
425
- * ENTRY UIRSTX(CP, RPARA)
426
- * CHARACTER CP*(*)
427
- */
428
- SUBROUTINE UIRSTX(
429
- CHARACTER*(*) CP
430
- REAL RPARA
431
- )
432
-
433
- /*****************************************************
434
- * grph2/uipack/uirqnp.f
435
- ****************************************************/
436
- /*
437
- * SUBROUTINE UIRQNP(NCP)
438
- */
439
- SUBROUTINE UIRQNP(
440
- INTEGER o NCP
441
- )
442
-
443
- /*
444
- * ENTRY UIRQID(CP, IDX)
445
- * CHARACTER CP*(*)
446
- */
447
- SUBROUTINE UIRQID(
448
- CHARACTER*(*) CP
449
- INTEGER o IDX
450
- )
451
-
452
- /*
453
- * ENTRY UIRQCP(IDX, CP)
454
- * CHARACTER CP*(*)
455
- */
456
- SUBROUTINE UIRQCP(
457
- INTEGER IDX
458
- CHARACTER*(*) o CP
459
- )
460
-
461
- /*
462
- * ENTRY UIRQCL(IDX, CP)
463
- * CHARACTER CP*(*)
464
- */
465
- SUBROUTINE UIRQCL(
466
- INTEGER IDX
467
- CHARACTER*(*) o CP
468
- )
469
-
470
- /*
471
- * ENTRY UIRQVL(IDX, RPARA)
472
- */
473
- SUBROUTINE UIRQVL(
474
- INTEGER IDX
475
- REAL o RPARA
476
- )
477
-
478
- /*
479
- * ENTRY UIRSVL(IDX, RPARA)
480
- */
481
- SUBROUTINE UIRSVL(
482
- INTEGER IDX
483
- REAL RPARA
484
- )
485
-
486
- /*
487
- * ENTRY UIRQIN(CP, IN)
488
- * CHARACTER CP*(*)
489
- */
490
- SUBROUTINE UIRQIN(
491
- CHARACTER*(*) CP
492
- INTEGER o IN
493
- )
494
-
495
- /*****************************************************
496
- * grph2/uipack/uiqfnm.f
497
- ****************************************************/
498
- /*
499
- * SUBROUTINE UIQFNM(CPARA,CFNAME)
500
- * CHARACTER CPARA*(*),CFNAME*(*)
501
- */
502
- SUBROUTINE UIQFNM(CPARA,CFNAME)
503
- CHARACTER*(*) CPARA
504
- CHARACTER*(*) o CFNAME
505
- )
506
-
507
- #endif
508
-