ruby-dcl 1.7.1 → 1.8.2

Sign up to get free protection for your applications and to get access to all the features.
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
@@ -1,516 +0,0 @@
1
- /*
2
- * grph2_ulpack.fp
3
- *
4
- * $Id: grph2_ulpack.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * grph2/ulpack/ulxlog.f
9
- ****************************************************/
10
- /*
11
- * SUBROUTINE ULXLOG ( CSIDE, NLBL, NTICKS )
12
- * CHARACTER CH(MAXL)*16,CHR*8,CFMT*16,CSGI,CSIDE
13
- */
14
- SUBROUTINE ULXLOG(
15
- CHARACTER*(*) CSIDE
16
- INTEGER NLBL
17
- INTEGER NTICKS
18
- )
19
-
20
- /*****************************************************
21
- * grph2/ulpack/ulylog.f
22
- ****************************************************/
23
- /*
24
- * SUBROUTINE ULYLOG ( CSIDE, NLBL, NTICKS )
25
- * CHARACTER CH(MAXL)*16,CHR*8,CFMT*16,CSGI,CSIDE
26
- */
27
- SUBROUTINE ULYLOG(
28
- CHARACTER*(*) CSIDE
29
- INTEGER NLBL
30
- INTEGER NTICKS
31
- )
32
-
33
- /*****************************************************
34
- * grph2/ulpack/ulxlbl.f
35
- ****************************************************/
36
- /*
37
- * SUBROUTINE ULXLBL ( BL, NBL, INUM )
38
- * DIMENSION XBL(10,4),NXBL(4),BL(*)
39
- */
40
- SUBROUTINE ULXLBL(
41
- REAL (NBL) o BL
42
- INTEGER o NBL
43
- INTEGER INUM
44
- )
45
-
46
- /*
47
- * ENTRY ULSXBL ( BL, NBL )
48
- * DIMENSION XBL(10,4),NXBL(4),BL(*)
49
- */
50
- SUBROUTINE ULSXBL(
51
- REAL (NBL) BL
52
- INTEGER NBL
53
- )
54
-
55
- /*
56
- * ENTRY ULQXBL ( BL, NBL )
57
- * DIMENSION XBL(10,4),NXBL(4),BL(*)
58
- */
59
- SUBROUTINE ULQXBL(
60
- REAL (NBL) o BL
61
- INTEGER o NBL
62
- )
63
-
64
- /*****************************************************
65
- * grph2/ulpack/ulylbl.f
66
- ****************************************************/
67
- /*
68
- * SUBROUTINE ULYLBL ( BL, NBL, INUM )
69
- * DIMENSION YBL(10,4),NYBL(4),BL(*)
70
- */
71
- SUBROUTINE ULYLBL(
72
- REAL (NBL) o BL
73
- INTEGER o NBL
74
- INTEGER INUM
75
- )
76
-
77
- /*
78
- * ENTRY ULSYBL ( BL, NBL )
79
- * DIMENSION YBL(10,4),NYBL(4),BL(*)
80
- */
81
- SUBROUTINE ULSYBL(
82
- REAL (NBL) BL
83
- INTEGER NBL
84
- )
85
-
86
- /*
87
- * ENTRY ULQYBL ( BL, NBL )
88
- * DIMENSION YBL(10,4),NYBL(4),BL(*)
89
- */
90
- SUBROUTINE ULQYBL(
91
- REAL (NBL) o BL
92
- INTEGER o NBL
93
- )
94
-
95
- /*****************************************************
96
- * grph2/ulpack/ulpget.f
97
- ****************************************************/
98
- /*
99
- * SUBROUTINE ULPGET(CP,IPARA)
100
- * CHARACTER CP*(*)
101
- */
102
- /* SUBROUTINE ULPGET(
103
- * CHARACTER*(*) CP
104
- * INTEGER o IPARA
105
- * )
106
- */
107
-
108
- /*
109
- * ENTRY ULPSET(CP, IPARA)
110
- * CHARACTER CP*(*)
111
- */
112
- /* SUBROUTINE ULPSET(
113
- * CHARACTER*(*) CP
114
- * INTEGER IPARA
115
- * )
116
- */
117
-
118
- /*
119
- * ENTRY ULPSTX(CP, IPARA)
120
- * CHARACTER CP*(*)
121
- */
122
- /* SUBROUTINE ULPSTX(
123
- * CHARACTER*(*) CP
124
- * INTEGER IPARA
125
- * )
126
- */
127
-
128
- /*****************************************************
129
- * grph2/ulpack/ulpqnp.f
130
- ****************************************************/
131
- /*
132
- * SUBROUTINE ULPQNP(NCP)
133
- */
134
- SUBROUTINE ULPQNP(
135
- INTEGER o NCP
136
- )
137
-
138
- /*
139
- * ENTRY ULPQID(CP, IDX)
140
- * CHARACTER CP*(*)
141
- */
142
- SUBROUTINE ULPQID(
143
- CHARACTER*(*) CP
144
- INTEGER o IDX
145
- )
146
-
147
- /*
148
- * ENTRY ULPQCP(IDX, CP)
149
- * CHARACTER CP*(*)
150
- */
151
- SUBROUTINE ULPQCP(
152
- INTEGER IDX
153
- CHARACTER*(*) o CP
154
- )
155
-
156
- /*
157
- * ENTRY ULPQCL(IDX, CP)
158
- * CHARACTER CP*(*)
159
- */
160
- SUBROUTINE ULPQCL(
161
- INTEGER IDX
162
- CHARACTER*(*) o CP
163
- )
164
-
165
- /*
166
- * ENTRY ULPQIT(IDX, ITP)
167
- */
168
- SUBROUTINE ULPQIT(
169
- INTEGER IDX
170
- INTEGER o ITP
171
- )
172
-
173
- /*
174
- * ENTRY ULPQVL(IDX, IPARA)
175
- */
176
- SUBROUTINE ULPQVL(
177
- INTEGER IDX
178
- INTEGER o IPARA
179
- )
180
-
181
- /*
182
- * ENTRY ULPSVL(IDX, IPARA)
183
- */
184
- SUBROUTINE ULPSVL(
185
- INTEGER IDX
186
- INTEGER IPARA
187
- )
188
-
189
- /*
190
- * ENTRY ULPQIN(CP, IN)
191
- * CHARACTER CP*(*)
192
- */
193
- SUBROUTINE ULPQIN(
194
- CHARACTER*(*) CP
195
- INTEGER o IN
196
- )
197
-
198
- /*****************************************************
199
- * grph2/ulpack/uliget.f
200
- ****************************************************/
201
- /*
202
- * SUBROUTINE ULIGET(CP, IPARA)
203
- * CHARACTER CP*(*)
204
- */
205
- SUBROUTINE ULIGET(
206
- CHARACTER*(*) CP
207
- INTEGER o IPARA
208
- )
209
-
210
- /*
211
- * ENTRY ULISET(CP, IPARA)
212
- * CHARACTER CP*(*)
213
- */
214
- SUBROUTINE ULISET(
215
- CHARACTER*(*) CP
216
- INTEGER IPARA
217
- )
218
-
219
- /*
220
- * ENTRY ULISTX(CP, IPARA)
221
- * CHARACTER CP*(*)
222
- */
223
- SUBROUTINE ULISTX(
224
- CHARACTER*(*) CP
225
- INTEGER IPARA
226
- )
227
-
228
- /*****************************************************
229
- * grph2/ulpack/uliqnp.f
230
- ****************************************************/
231
- /*
232
- * SUBROUTINE ULIQNP(NCP)
233
- */
234
- SUBROUTINE ULIQNP(
235
- INTEGER o NCP
236
- )
237
-
238
- /*
239
- * ENTRY ULIQID(CP, IDX)
240
- * CHARACTER CP*(*)
241
- */
242
- SUBROUTINE ULIQID(
243
- CHARACTER*(*) CP
244
- INTEGER o IDX
245
- )
246
-
247
- /*
248
- * ENTRY ULIQCP(IDX, CP)
249
- * CHARACTER CP*(*)
250
- */
251
- SUBROUTINE ULIQCP(
252
- INTEGER IDX
253
- CHARACTER*(*) o CP
254
- )
255
-
256
- /*
257
- * ENTRY ULIQCL(IDX, CP)
258
- * CHARACTER CP*(*)
259
- */
260
- SUBROUTINE ULIQCL(
261
- INTEGER IDX
262
- CHARACTER*(*) o CP
263
- )
264
-
265
- /*
266
- * ENTRY ULIQVL(IDX, IPARA)
267
- */
268
- SUBROUTINE ULIQVL(
269
- INTEGER IDX
270
- INTEGER o IPARA
271
- )
272
-
273
- /*
274
- * ENTRY ULISVL(IDX, IPARA)
275
- */
276
- SUBROUTINE ULISVL(
277
- INTEGER IDX
278
- INTEGER IPARA
279
- )
280
-
281
- /*
282
- * ENTRY ULIQIN(CP, IN)
283
- * CHARACTER CP*(*)
284
- */
285
- SUBROUTINE ULIQIN(
286
- CHARACTER*(*) CP
287
- INTEGER o IN
288
- )
289
-
290
- /*****************************************************
291
- * grph2/ulpack/ullget.f
292
- ****************************************************/
293
- /*
294
- * SUBROUTINE ULLGET(CP, LPARA)
295
- * CHARACTER CP*(*)
296
- * LOGICAL LPARA
297
- */
298
- SUBROUTINE ULLGET(
299
- CHARACTER*(*) CP
300
- LOGICAL o LPARA
301
- )
302
-
303
- /*
304
- * ENTRY ULLSET(CP, LPARA)
305
- * CHARACTER CP*(*)
306
- * LOGICAL LPARA
307
- */
308
- SUBROUTINE ULLSET(
309
- CHARACTER*(*) CP
310
- LOGICAL LPARA
311
- )
312
-
313
- /*
314
- * ENTRY ULLSTX(CP, LPARA)
315
- * CHARACTER CP*(*)
316
- * LOGICAL LPARA
317
- */
318
- SUBROUTINE ULLSTX(
319
- CHARACTER*(*) CP
320
- LOGICAL LPARA
321
- )
322
-
323
- /*****************************************************
324
- * grph2/ulpack/ullqnp.f
325
- ****************************************************/
326
- /*
327
- * SUBROUTINE ULLQNP(NCP)
328
- */
329
- SUBROUTINE ULLQNP(
330
- INTEGER o NCP
331
- )
332
-
333
- /*
334
- * ENTRY ULLQID(CP, IDX)
335
- * CHARACTER CP*(*)
336
- */
337
- SUBROUTINE ULLQID(
338
- CHARACTER*(*) CP
339
- INTEGER o IDX
340
- )
341
-
342
- /*
343
- * ENTRY ULLQCP(IDX, CP)
344
- * CHARACTER CP*(*)
345
- */
346
- SUBROUTINE ULLQCP(
347
- INTEGER IDX
348
- CHARACTER*(*) o CP
349
- )
350
-
351
- /*
352
- * ENTRY ULLQCL(IDX, CP)
353
- * CHARACTER CP*(*)
354
- */
355
- SUBROUTINE ULLQCL(
356
- INTEGER IDX
357
- CHARACTER*(*) o CP
358
- )
359
-
360
- /*
361
- * ENTRY ULLQVL(IDX, LPARA)
362
- * LOGICAL LPARA
363
- */
364
- SUBROUTINE ULLQVL(
365
- INTEGER IDX
366
- LOGICAL o LPARA
367
- )
368
-
369
- /*
370
- * ENTRY ULLSVL(IDX, LPARA)
371
- * LOGICAL LPARA
372
- */
373
- SUBROUTINE ULLSVL(
374
- INTEGER IDX
375
- LOGICAL LPARA
376
- )
377
-
378
- /*
379
- * ENTRY ULLQIN(CP, IN)
380
- * CHARACTER CP*(*)
381
- */
382
- SUBROUTINE ULLQIN(
383
- CHARACTER*(*) CP
384
- INTEGER o IN
385
- )
386
-
387
- /*****************************************************
388
- * grph2/ulpack/ulrget.f
389
- ****************************************************/
390
- /*
391
- * SUBROUTINE ULRGET(CP, RPARA)
392
- * CHARACTER CP*(*)
393
- */
394
- SUBROUTINE ULRGET(
395
- CHARACTER*(*) CP
396
- REAL o RPARA
397
- )
398
-
399
- /*
400
- * ENTRY ULRSET(CP, RPARA)
401
- * CHARACTER CP*(*)
402
- */
403
- SUBROUTINE ULRSET(
404
- CHARACTER*(*) CP
405
- REAL RPARA
406
- )
407
-
408
- /*
409
- * ENTRY ULRSTX(CP, RPARA)
410
- * CHARACTER CP*(*)
411
- */
412
- SUBROUTINE ULRSTX(
413
- CHARACTER*(*) CP
414
- REAL RPARA
415
- )
416
-
417
- /*****************************************************
418
- * grph2/ulpack/ulrqnp.f
419
- ****************************************************/
420
- /*
421
- * SUBROUTINE ULRQNP(NCP)
422
- */
423
- SUBROUTINE ULRQNP(
424
- INTEGER o NCP
425
- )
426
-
427
- /*
428
- * ENTRY ULRQID(CP, IDX)
429
- * CHARACTER CP*(*)
430
- */
431
- SUBROUTINE ULRQID(
432
- CHARACTER*(*) CP
433
- INTEGER o IDX
434
- )
435
-
436
- /*
437
- * ENTRY ULRQCP(IDX, CP)
438
- * CHARACTER CP*(*)
439
- */
440
- SUBROUTINE ULRQCP(
441
- INTEGER IDX
442
- CHARACTER*(*) o CP
443
- )
444
-
445
- /*
446
- * ENTRY ULRQCL(IDX, CP)
447
- * CHARACTER CP*(*)
448
- */
449
- SUBROUTINE ULRQCL(
450
- INTEGER IDX
451
- CHARACTER*(*) o CP
452
- )
453
-
454
- /*
455
- * ENTRY ULRQVL(IDX, RPARA)
456
- */
457
- SUBROUTINE ULRQVL(
458
- INTEGER IDX
459
- REAL o RPARA
460
- )
461
-
462
- /*
463
- * ENTRY ULRSVL(IDX, RPARA)
464
- */
465
- SUBROUTINE ULRSVL(
466
- INTEGER IDX
467
- REAL RPARA
468
- )
469
-
470
- /*
471
- * ENTRY ULRQIN(CP, IN)
472
- * CHARACTER CP*(*)
473
- */
474
- SUBROUTINE ULRQIN(
475
- CHARACTER*(*) CP
476
- INTEGER o IN
477
- )
478
-
479
- /*****************************************************
480
- * grph2/ulpack/ulxsfm.f
481
- ****************************************************/
482
- /*
483
- * SUBROUTINE ULXSFM ( CXFMT )
484
- * CHARACTER CXFMT*(*)
485
- */
486
- SUBROUTINE ULXSFM(
487
- CHARACTER*(*) CXFMT
488
- )
489
-
490
- /*
491
- * ENTRY ULXQFM ( CXFMT )
492
- * CHARACTER CXFMT*(*)
493
- */
494
- SUBROUTINE ULXQFM(
495
- CHARACTER*(*) o CXFMT
496
- )
497
-
498
- /*****************************************************
499
- * grph2/ulpack/ulysfm.f
500
- ****************************************************/
501
- /*
502
- * SUBROUTINE ULYSFM ( CYFMT )
503
- * CHARACTER CYFMT*(*)
504
- */
505
- SUBROUTINE ULYSFM(
506
- CHARACTER*(*) CYFMT
507
- )
508
-
509
- /*
510
- * ENTRY ULYQFM ( CYFMT )
511
- * CHARACTER CYFMT*(*)
512
- */
513
- SUBROUTINE ULYQFM(
514
- CHARACTER*(*) o CYFMT
515
- )
516
-