ruby-dcl 1.7.1 → 1.8.0

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 (307) hide show
  1. checksums.yaml +4 -4
  2. data/{ChangeLog → .ChangeLog.until20150318} +0 -0
  3. data/LICENSE.txt +1 -1
  4. data/Rakefile +7 -11
  5. data/demo/gokuraku/hop/hop.rb +1 -1
  6. data/demo/gokuraku/jump/jump1.rb +1 -1
  7. data/demo/gokuraku/jump/jump2.rb +1 -1
  8. data/demo/gokuraku/layout/lay1.rb +1 -1
  9. data/demo/gokuraku/layout/lay2.rb +1 -1
  10. data/demo/gokuraku/step/step0.rb +1 -1
  11. data/demo/gokuraku/step/step1.rb +1 -1
  12. data/demo/gokuraku/step/step2.rb +1 -1
  13. data/demo/gokuraku/u1d/u1d1.rb +1 -1
  14. data/demo/gokuraku/u1d/u1d2.rb +1 -1
  15. data/demo/gokuraku/u2d/u2d1.rb +1 -1
  16. data/demo/gokuraku/u2d/u2d2.rb +1 -1
  17. data/demo/gokuraku/u2d/u2d3.rb +1 -1
  18. data/demo/gokuraku/u2d/u2d4.rb +1 -1
  19. data/demo/grph1/scpack/scpkt2.rb +1 -1
  20. data/demo/grph1/scpack/scpkt3.rb +1 -1
  21. data/demo/grph1/scpack/scpkt6.rb +1 -1
  22. data/demo/grph1/scpack/scpkt7.rb +1 -1
  23. data/demo/grph1/scpack/scpkt8.rb +1 -1
  24. data/demo/grph1/sgpack/sgfont.rb +1 -1
  25. data/demo/grph1/sgpack/sgfonz.rb +1 -1
  26. data/demo/grph1/sgpack/sgksx1.rb +1 -1
  27. data/demo/grph1/sgpack/sgksx2.rb +1 -1
  28. data/demo/grph1/sgpack/sgksx3.rb +1 -1
  29. data/demo/grph1/sgpack/sglidx.rb +1 -1
  30. data/demo/grph1/sgpack/sgltyp.rb +1 -1
  31. data/demo/grph1/sgpack/sgpk01.rb +1 -1
  32. data/demo/grph1/sgpack/sgpk02.rb +1 -1
  33. data/demo/grph1/sgpack/sgpk03.rb +1 -1
  34. data/demo/grph1/sgpack/sgpk04.rb +1 -1
  35. data/demo/grph1/sgpack/sgpk05.rb +1 -1
  36. data/demo/grph1/sgpack/sgpk06.rb +1 -1
  37. data/demo/grph1/sgpack/sgpk07.rb +1 -1
  38. data/demo/grph1/sgpack/sgpk08.rb +1 -1
  39. data/demo/grph1/sgpack/sgpk09.rb +1 -1
  40. data/demo/grph1/sgpack/sgpk10.rb +1 -1
  41. data/demo/grph1/sgpack/sgtclr.rb +1 -1
  42. data/demo/grph1/sgpack/sgtone.rb +1 -1
  43. data/demo/grph1/sgpack/sgtonz.rb +1 -1
  44. data/demo/grph1/slpack/slpk01.rb +1 -1
  45. data/demo/grph1/slpack/slpk02.rb +1 -1
  46. data/demo/grph1/slpack/slpk03.rb +1 -1
  47. data/demo/grph1/slpack/slpk04.rb +1 -1
  48. data/demo/grph2/grpack/grpk01.rb +1 -1
  49. data/demo/grph2/ucpack/ucpk01.rb +1 -1
  50. data/demo/grph2/ucpack/ucpk02.rb +1 -1
  51. data/demo/grph2/udegpk/u2df01.rb +1 -1
  52. data/demo/grph2/udegpk/u2df02.rb +1 -1
  53. data/demo/grph2/udegpk/u2df03.rb +1 -1
  54. data/demo/grph2/udegpk/u2df04.rb +1 -1
  55. data/demo/grph2/udegpk/u2df05.rb +1 -1
  56. data/demo/grph2/udegpk/u2df06.rb +1 -1
  57. data/demo/grph2/udegpk/u2df07.rb +1 -1
  58. data/demo/grph2/udegpk/u2df08.rb +1 -1
  59. data/demo/grph2/uipack/uipk01.rb +1 -1
  60. data/demo/grph2/uipack/uipk02.rb +1 -1
  61. data/demo/grph2/ulpack/ulpk01.rb +1 -1
  62. data/demo/grph2/ulpack/ulpk01n.rb +1 -1
  63. data/demo/grph2/ulpack/ulpk02.rb +1 -1
  64. data/demo/grph2/ulpack/ulpk02n.rb +1 -1
  65. data/demo/grph2/umpack/test01.rb +1 -1
  66. data/demo/grph2/umpack/test02.rb +1 -1
  67. data/demo/grph2/umpack/test03.rb +1 -1
  68. data/demo/grph2/umpack/test04.rb +1 -1
  69. data/demo/grph2/umpack/test05.rb +1 -1
  70. data/demo/grph2/umpack/test06.rb +1 -1
  71. data/demo/grph2/umpack/test07.rb +1 -1
  72. data/demo/grph2/umpack/test08.rb +1 -1
  73. data/demo/grph2/umpack/umpk01.rb +1 -1
  74. data/demo/grph2/umpack/umpk02.rb +1 -1
  75. data/demo/grph2/umpack/umpk03.rb +1 -1
  76. data/demo/grph2/umpack/umpk04.rb +1 -1
  77. data/demo/grph2/umpack/umpk05.rb +1 -1
  78. data/demo/grph2/uspack/uspk01.rb +1 -1
  79. data/demo/grph2/uspack/uspk02.rb +1 -1
  80. data/demo/grph2/uspack/uspk03.rb +1 -1
  81. data/demo/grph2/uspack/uspk04.rb +1 -1
  82. data/demo/grph2/uspack/uspk05.rb +1 -1
  83. data/demo/grph2/uspack/uspk06.rb +1 -1
  84. data/demo/grph2/uspack/uspk07.rb +1 -1
  85. data/demo/grph2/uspack/uspk08.rb +1 -1
  86. data/demo/grph2/uspack/uspk09.rb +1 -1
  87. data/demo/grph2/uspack/uspk10.rb +1 -1
  88. data/demo/grph2/uspack/uspk11.rb +1 -1
  89. data/demo/grph2/uspack/uspk12.rb +1 -1
  90. data/demo/grph2/uupack/uupk01.rb +1 -1
  91. data/demo/grph2/uupack/uupk02.rb +1 -1
  92. data/demo/grph2/uupack/uupk03.rb +1 -1
  93. data/demo/grph2/uupack/uupk04.rb +1 -1
  94. data/demo/grph2/uupack/uupk05.rb +1 -1
  95. data/demo/grph2/uupack/uupk06.rb +1 -1
  96. data/demo/grph2/uupack/uupk07.rb +1 -1
  97. data/demo/grph2/uxyzpk/uxyz01.rb +1 -1
  98. data/demo/grph2/uxyzpk/uxyz02.rb +1 -1
  99. data/demo/grph2/uxyzpk/uxyz03.rb +1 -1
  100. data/demo/grph2/uxyzpk/uxyz04.rb +1 -1
  101. data/demo/grph2/uxyzpk/uxyz05.rb +1 -1
  102. data/demo/grph2/uxyzpk/uxyz06.rb +1 -1
  103. data/demo/grph2/uxyzpk/uxyz07.rb +1 -1
  104. data/demo/grph2/uxyzpk/uxyz08.rb +1 -1
  105. data/demo/grph2/uxyzpk/uxyz09.rb +1 -1
  106. data/demo/grph2/uxyzpk/uxyz10.rb +1 -1
  107. data/demo/grph2/ximage/ximg01.rb +1 -1
  108. data/demo/math1/clsplib/cslb01.rb +1 -1
  109. data/demo/math2/fftlib/fftl01.rb +1 -1
  110. data/demo/math2/fftlib/fftl02.rb +1 -1
  111. data/demo/math2/intrlib/intr01.rb +1 -1
  112. data/demo/math2/rnmlib/rnml01.rb +1 -1
  113. data/demo/math2/vstlib/vstl01.rb +1 -1
  114. data/demo/math2/vstlib/vstl02.rb +1 -1
  115. data/demo/rakuraku/color/color1.rb +1 -1
  116. data/demo/rakuraku/color/color2.rb +1 -1
  117. data/demo/rakuraku/color/color3.rb +1 -1
  118. data/demo/rakuraku/kihon/kihon1.rb +1 -1
  119. data/demo/rakuraku/kihon/kihon2.rb +1 -1
  120. data/demo/rakuraku/kihon/kihon3.rb +1 -1
  121. data/demo/rakuraku/kihon/kihon4.rb +1 -1
  122. data/demo/rakuraku/kihon/kihon5.rb +1 -1
  123. data/demo/rakuraku/kihon/kihon6.rb +1 -1
  124. data/demo/rakuraku/kihon/kihon7.rb +1 -1
  125. data/demo/rakuraku/kihon/kihon8.rb +1 -1
  126. data/demo/rakuraku/kihon/kihon9.rb +1 -1
  127. data/demo/rakuraku/kihon/kihona.rb +1 -1
  128. data/demo/rakuraku/kihon/kihonb.rb +1 -1
  129. data/demo/rakuraku/kihon/kihonc.rb +1 -1
  130. data/demo/rakuraku/layout/lay1.rb +1 -1
  131. data/demo/rakuraku/layout/lay2.rb +1 -1
  132. data/demo/rakuraku/layout/lay3.rb +1 -1
  133. data/demo/rakuraku/map3d/map3d1.rb +1 -1
  134. data/demo/rakuraku/map3d/map3d2.rb +1 -1
  135. data/demo/rakuraku/map3d/map3d3.rb +1 -1
  136. data/demo/rakuraku/map3d/map3d4.rb +1 -1
  137. data/demo/rakuraku/map3d/map3d5.rb +1 -1
  138. data/demo/rakuraku/miss/miss1.rb +1 -1
  139. data/demo/rakuraku/miss/miss2.rb +1 -1
  140. data/demo/rakuraku/quick/quick1.rb +1 -1
  141. data/demo/rakuraku/quick/quick2.rb +1 -1
  142. data/demo/rakuraku/quick/quick3.rb +1 -1
  143. data/demo/rakuraku/quick/quick4.rb +1 -1
  144. data/demo/rakuraku/quick/quick5.rb +1 -1
  145. data/demo/rakuraku/u2d/u2d1.rb +1 -1
  146. data/demo/rakuraku/u2d/u2d2.rb +1 -1
  147. data/demo/rakuraku/u2d/u2d3.rb +1 -1
  148. data/demo/rakuraku/u2d/u2d4.rb +1 -1
  149. data/demo/rakuraku/u2d/u2d5.rb +1 -1
  150. data/demo/rakuraku/u2d/u2d6.rb +1 -1
  151. data/demo/rakuraku/u2d/u2d7.rb +1 -1
  152. data/demo/rakuraku/uspack/uspac1.rb +1 -1
  153. data/demo/rakuraku/uspack/uspac2.rb +1 -1
  154. data/demo/rakuraku/uspack/uspac3.rb +1 -1
  155. data/demo/rakuraku/uspack/uspac4.rb +1 -1
  156. data/demo/rakuraku/uxyz/uxyz1.rb +1 -1
  157. data/demo/rakuraku/uxyz/uxyz2.rb +1 -1
  158. data/demo/rakuraku/uxyz/uxyz3.rb +1 -1
  159. data/demo/rakuraku/uxyz/uxyz4.rb +1 -1
  160. data/demo/rakuraku/uxyz/uxyz5.rb +1 -1
  161. data/demo/rakuraku/uxyz/uxyz6.rb +1 -1
  162. data/demo/rakuraku/uxyz/uxyz7.rb +1 -1
  163. data/demo/rakuraku/uxyz/uxyz8.rb +1 -1
  164. data/ext/numru/dcl_cary2obj.c +28 -23
  165. data/ext/numru/dcl_obj2cary.c +8 -4
  166. data/ext/numru/dcl_rubydcloriginal.c +14 -4
  167. data/ext/numru/extconf.rb +9 -51
  168. data/ext/numru/grph1_csgi.c +9 -5
  169. data/ext/numru/grph1_scpack.c +9 -5
  170. data/ext/numru/grph1_sgpack.c +9 -5
  171. data/ext/numru/grph1_slpack.c +9 -5
  172. data/ext/numru/grph1_stpack.c +9 -5
  173. data/ext/numru/grph1_swpack.c +69 -5
  174. data/ext/numru/grph2_grpack.c +9 -5
  175. data/ext/numru/grph2_ucpack.c +9 -5
  176. data/ext/numru/grph2_udpack.c +9 -5
  177. data/ext/numru/grph2_uepack.c +9 -5
  178. data/ext/numru/grph2_ugpack.c +9 -5
  179. data/ext/numru/grph2_uhpack.c +9 -5
  180. data/ext/numru/grph2_uipack.c +9 -5
  181. data/ext/numru/grph2_ulpack.c +9 -5
  182. data/ext/numru/grph2_umpack.c +9 -5
  183. data/ext/numru/grph2_uspack.c +9 -5
  184. data/ext/numru/grph2_uupack.c +9 -5
  185. data/ext/numru/grph2_uvpack.c +9 -5
  186. data/ext/numru/grph2_uwpack.c +9 -5
  187. data/ext/numru/grph2_uxpack.c +9 -5
  188. data/ext/numru/grph2_uypack.c +9 -5
  189. data/ext/numru/grph2_uzpack.c +9 -5
  190. data/ext/numru/init.c +202 -0
  191. data/ext/numru/init.c.default +7 -0
  192. data/ext/numru/math1_blklib.c +9 -5
  193. data/ext/numru/math1_chrlib.c +9 -5
  194. data/ext/numru/math1_clsplib.c +9 -5
  195. data/ext/numru/math1_fnclib.c +9 -5
  196. data/ext/numru/math1_gnmlib.c +9 -5
  197. data/ext/numru/math1_gt2dlib.c +9 -5
  198. data/ext/numru/math1_ifalib.c +9 -5
  199. data/ext/numru/math1_indxlib.c +9 -5
  200. data/ext/numru/math1_intlib.c +9 -5
  201. data/ext/numru/math1_lrllib.c +9 -5
  202. data/ext/numru/math1_maplib.c +9 -5
  203. data/ext/numru/math1_oslib.c +9 -5
  204. data/ext/numru/math1_rfalib.c +9 -5
  205. data/ext/numru/math1_rfblib.c +9 -5
  206. data/ext/numru/math1_sublib.c +9 -5
  207. data/ext/numru/math1_syslib.c +9 -5
  208. data/ext/numru/math1_vialib.c +9 -5
  209. data/ext/numru/math1_viblib.c +9 -5
  210. data/ext/numru/math1_vralib.c +9 -5
  211. data/ext/numru/math1_vrblib.c +9 -5
  212. data/ext/numru/math1_xfclib.c +9 -5
  213. data/ext/numru/math2_fftlib.c +9 -5
  214. data/ext/numru/math2_intrlib.c +9 -5
  215. data/ext/numru/math2_rnmlib.c +9 -5
  216. data/ext/numru/math2_shtlib.c +9 -5
  217. data/ext/numru/math2_vstlib.c +9 -5
  218. data/ext/numru/misc1_chnlib.c +9 -5
  219. data/ext/numru/misc1_datelib.c +9 -5
  220. data/ext/numru/misc1_fmtlib.c +9 -5
  221. data/ext/numru/misc1_misclib.c +9 -5
  222. data/ext/numru/misc1_randlib.c +9 -5
  223. data/ext/numru/misc1_timelib.c +9 -5
  224. data/lib/numru/dcl.rb +6 -5580
  225. data/lib/numru/dcl/dcl.rb +5591 -0
  226. data/lib/numru/dcl/version.rb +5 -0
  227. data/ruby-dcl-bigmem.gemspec +36 -0
  228. data/ruby-dcl.gemspec +10 -9
  229. metadata +17 -93
  230. data/.gitignore +0 -13
  231. data/.rspec +0 -2
  232. data/.travis.yml +0 -3
  233. data/GenWrapper/cproto2init.rb +0 -41
  234. data/GenWrapper/dcl_narrayed_funcs.rb +0 -181
  235. data/GenWrapper/dcl_rb_footing +0 -29
  236. data/GenWrapper/dcl_rb_heading +0 -123
  237. data/GenWrapper/def.rb +0 -20
  238. data/GenWrapper/elim_ary_size.rb +0 -398
  239. data/GenWrapper/etc/p_header +0 -64
  240. data/GenWrapper/pparse.rb +0 -137
  241. data/GenWrapper/proto/grph1_00 +0 -17
  242. data/GenWrapper/proto/grph1_csgi.fp +0 -27
  243. data/GenWrapper/proto/grph1_scpack.fp +0 -442
  244. data/GenWrapper/proto/grph1_sgpack.fp +0 -1772
  245. data/GenWrapper/proto/grph1_slpack.fp +0 -316
  246. data/GenWrapper/proto/grph1_stpack.fp +0 -455
  247. data/GenWrapper/proto/grph1_swpack.fp +0 -826
  248. data/GenWrapper/proto/grph2_00 +0 -16
  249. data/GenWrapper/proto/grph2_grpack.fp +0 -139
  250. data/GenWrapper/proto/grph2_ucpack.fp +0 -522
  251. data/GenWrapper/proto/grph2_udpack.fp +0 -692
  252. data/GenWrapper/proto/grph2_uepack.fp +0 -601
  253. data/GenWrapper/proto/grph2_ugpack.fp +0 -436
  254. data/GenWrapper/proto/grph2_uhpack.fp +0 -246
  255. data/GenWrapper/proto/grph2_uipack.fp +0 -508
  256. data/GenWrapper/proto/grph2_ulpack.fp +0 -516
  257. data/GenWrapper/proto/grph2_umpack.fp +0 -676
  258. data/GenWrapper/proto/grph2_uspack.fp +0 -989
  259. data/GenWrapper/proto/grph2_uupack.fp +0 -663
  260. data/GenWrapper/proto/grph2_uvpack.fp +0 -246
  261. data/GenWrapper/proto/grph2_uwpack.fp +0 -203
  262. data/GenWrapper/proto/grph2_uxpack.fp +0 -295
  263. data/GenWrapper/proto/grph2_uypack.fp +0 -295
  264. data/GenWrapper/proto/grph2_uzpack.fp +0 -574
  265. data/GenWrapper/proto/math1_00 +0 -12
  266. data/GenWrapper/proto/math1_blklib.fp +0 -58
  267. data/GenWrapper/proto/math1_chrlib.fp +0 -83
  268. data/GenWrapper/proto/math1_clsplib.fp +0 -74
  269. data/GenWrapper/proto/math1_fnclib.fp +0 -79
  270. data/GenWrapper/proto/math1_gnmlib.fp +0 -118
  271. data/GenWrapper/proto/math1_gt2dlib.fp +0 -144
  272. data/GenWrapper/proto/math1_ifalib.fp +0 -123
  273. data/GenWrapper/proto/math1_indxlib.fp +0 -222
  274. data/GenWrapper/proto/math1_intlib.fp +0 -46
  275. data/GenWrapper/proto/math1_lrllib.fp +0 -276
  276. data/GenWrapper/proto/math1_maplib.fp +0 -24
  277. data/GenWrapper/proto/math1_oslib.fp +0 -28
  278. data/GenWrapper/proto/math1_rfalib.fp +0 -420
  279. data/GenWrapper/proto/math1_rfblib.fp +0 -51
  280. data/GenWrapper/proto/math1_sublib.fp +0 -60
  281. data/GenWrapper/proto/math1_syslib.fp +0 -767
  282. data/GenWrapper/proto/math1_vialib.fp +0 -339
  283. data/GenWrapper/proto/math1_viblib.fp +0 -264
  284. data/GenWrapper/proto/math1_vralib.fp +0 -339
  285. data/GenWrapper/proto/math1_vrblib.fp +0 -264
  286. data/GenWrapper/proto/math1_xfclib.fp +0 -68
  287. data/GenWrapper/proto/math2_00 +0 -12
  288. data/GenWrapper/proto/math2_fftlib.fp +0 -803
  289. data/GenWrapper/proto/math2_intrlib.fp +0 -32
  290. data/GenWrapper/proto/math2_odelib.fp_notused +0 -568
  291. data/GenWrapper/proto/math2_rnmlib.fp +0 -54
  292. data/GenWrapper/proto/math2_shtlib.fp +0 -1292
  293. data/GenWrapper/proto/math2_vstlib.fp +0 -84
  294. data/GenWrapper/proto/misc1_00 +0 -17
  295. data/GenWrapper/proto/misc1_chnlib.fp +0 -47
  296. data/GenWrapper/proto/misc1_datelib.fp +0 -352
  297. data/GenWrapper/proto/misc1_fmtlib.fp +0 -19
  298. data/GenWrapper/proto/misc1_misclib.fp +0 -26
  299. data/GenWrapper/proto/misc1_randlib.fp +0 -50
  300. data/GenWrapper/proto/misc1_timelib.fp +0 -151
  301. data/GenWrapper/proto2c.rb +0 -13
  302. data/GenWrapper/prototype.rb +0 -209
  303. data/GenWrapper/util.rb +0 -9
  304. data/GenWrapper/variable.rb +0 -671
  305. data/ToDo +0 -2
  306. data/bin/console +0 -14
  307. data/bin/setup +0 -7
@@ -1,24 +0,0 @@
1
- /* math1/maplib :
2
- * Wrappers of the other subroutines are defined in ../dcl_narrayed_funcs.rb
3
- */
4
-
5
- SUBROUTINE MPSCON(
6
- REAL YLAT0
7
- )
8
-
9
- SUBROUTINE MPSCOA(
10
- REAL YLAT1
11
- )
12
-
13
- SUBROUTINE MPSCOC(
14
- REAL YLAT1
15
- REAL YLAT2
16
- )
17
-
18
- SUBROUTINE MPSBON(
19
- REAL YLAT1
20
- )
21
-
22
- SUBROUTINE MPSOTG(
23
- REAL RSAT
24
- )
@@ -1,28 +0,0 @@
1
- /*
2
- * math1_oslib.fp
3
- *
4
- * $Id: math1_oslib.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * math1/oslib/osqarn.f.dummy
9
- ****************************************************/
10
- /*
11
- * SUBROUTINE OSQARN(N)
12
- */
13
- SUBROUTINE OSQARN(
14
- INTEGER o N
15
- )
16
-
17
- /*****************************************************
18
- * math1/oslib/osgarg.f.dummy
19
- ****************************************************/
20
- /*
21
- * SUBROUTINE OSGARG(N, CHR)
22
- * CHARACTER CHAR*(*)
23
- */
24
- SUBROUTINE OSGARG(
25
- INTEGER N
26
- CHARACTER*(*) o CHR
27
- )
28
-
@@ -1,420 +0,0 @@
1
- /*
2
- * math1_rfalib.fp
3
- *
4
- * $Id: math1_rfalib.fp,v 1.1.1.1 2011/02/23 07:21:28 horinout Exp $
5
- */
6
-
7
- /*****************************************************
8
- * math1/rfalib/rmax.f
9
- ****************************************************/
10
- /*
11
- * REAL FUNCTION RMAX(RX,N,JX)
12
- * REAL RX(*)
13
- */
14
- REAL FUNCTION RMAX(
15
- REAL (JX*(N-1)+1) RX
16
- INTEGER N
17
- INTEGER JX
18
- )
19
-
20
- /*****************************************************
21
- * math1/rfalib/rmax0.f
22
- ****************************************************/
23
- /*
24
- * REAL FUNCTION RMAX0(RX,N,JX)
25
- * REAL RX(*)
26
- */
27
- REAL FUNCTION RMAX0(
28
- REAL (JX*(N-1)+1) RX
29
- INTEGER N
30
- INTEGER JX
31
- )
32
-
33
- /*****************************************************
34
- * math1/rfalib/rmax1.f
35
- ****************************************************/
36
- /*
37
- * REAL FUNCTION RMAX1(RX,N,JX)
38
- * REAL RX(*)
39
- */
40
- REAL FUNCTION RMAX1(
41
- REAL (JX*(N-1)+1) RX
42
- INTEGER N
43
- INTEGER JX
44
- )
45
-
46
- /*****************************************************
47
- * math1/rfalib/rmin.f
48
- ****************************************************/
49
- /*
50
- * REAL FUNCTION RMIN(RX,N,JX)
51
- * REAL RX(*)
52
- */
53
- REAL FUNCTION RMIN(
54
- REAL (JX*(N-1)+1) RX
55
- INTEGER N
56
- INTEGER JX
57
- )
58
-
59
- /*****************************************************
60
- * math1/rfalib/rmin0.f
61
- ****************************************************/
62
- /*
63
- * REAL FUNCTION RMIN0(RX,N,JX)
64
- * REAL RX(*)
65
- */
66
- REAL FUNCTION RMIN0(
67
- REAL (JX*(N-1)+1) RX
68
- INTEGER N
69
- INTEGER JX
70
- )
71
-
72
- /*****************************************************
73
- * math1/rfalib/rmin1.f
74
- ****************************************************/
75
- /*
76
- * REAL FUNCTION RMIN1(RX,N,JX)
77
- * REAL RX(*)
78
- */
79
- REAL FUNCTION RMIN1(
80
- REAL (JX*(N-1)+1) RX
81
- INTEGER N
82
- INTEGER JX
83
- )
84
-
85
- /*****************************************************
86
- * math1/rfalib/rsum.f
87
- ****************************************************/
88
- /*
89
- * REAL FUNCTION RSUM(RX,N,JX)
90
- * REAL RX(*)
91
- */
92
- REAL FUNCTION RSUM(
93
- REAL (JX*(N-1)+1) RX
94
- INTEGER N
95
- INTEGER JX
96
- )
97
-
98
- /*****************************************************
99
- * math1/rfalib/rsum0.f
100
- ****************************************************/
101
- /*
102
- * REAL FUNCTION RSUM0(RX,N,JX)
103
- * REAL RX(*)
104
- */
105
- REAL FUNCTION RSUM0(
106
- REAL (JX*(N-1)+1) RX
107
- INTEGER N
108
- INTEGER JX
109
- )
110
-
111
- /*****************************************************
112
- * math1/rfalib/rsum1.f
113
- ****************************************************/
114
- /*
115
- * REAL FUNCTION RSUM1(RX,N,JX)
116
- * REAL RX(*)
117
- */
118
- REAL FUNCTION RSUM1(
119
- REAL (JX*(N-1)+1) RX
120
- INTEGER N
121
- INTEGER JX
122
- )
123
-
124
- /*****************************************************
125
- * math1/rfalib/rave.f
126
- ****************************************************/
127
- /*
128
- * REAL FUNCTION RAVE(RX,N,JX)
129
- * REAL RX(*)
130
- */
131
- REAL FUNCTION RAVE(
132
- REAL (JX*(N-1)+1) RX
133
- INTEGER N
134
- INTEGER JX
135
- )
136
-
137
- /*****************************************************
138
- * math1/rfalib/rave0.f
139
- ****************************************************/
140
- /*
141
- * REAL FUNCTION RAVE0(RX,N,JX)
142
- * REAL RX(*)
143
- */
144
- REAL FUNCTION RAVE0(
145
- REAL (JX*(N-1)+1) RX
146
- INTEGER N
147
- INTEGER JX
148
- )
149
-
150
- /*****************************************************
151
- * math1/rfalib/rave1.f
152
- ****************************************************/
153
- /*
154
- * REAL FUNCTION RAVE1(RX,N,JX)
155
- * REAL RX(*)
156
- */
157
- REAL FUNCTION RAVE1(
158
- REAL (JX*(N-1)+1) RX
159
- INTEGER N
160
- INTEGER JX
161
- )
162
-
163
- /*****************************************************
164
- * math1/rfalib/rvar.f
165
- ****************************************************/
166
- /*
167
- * REAL FUNCTION RVAR(RX,N,JX)
168
- * REAL RX(*)
169
- */
170
- REAL FUNCTION RVAR(
171
- REAL (JX*(N-1)+1) RX
172
- INTEGER N
173
- INTEGER JX
174
- )
175
-
176
- /*****************************************************
177
- * math1/rfalib/rvar0.f
178
- ****************************************************/
179
- /*
180
- * REAL FUNCTION RVAR0(RX,N,JX)
181
- * REAL RX(*)
182
- */
183
- REAL FUNCTION RVAR0(
184
- REAL (JX*(N-1)+1) RX
185
- INTEGER N
186
- INTEGER JX
187
- )
188
-
189
- /*****************************************************
190
- * math1/rfalib/rvar1.f
191
- ****************************************************/
192
- /*
193
- * REAL FUNCTION RVAR1(RX,N,JX)
194
- * REAL RX(*)
195
- */
196
- REAL FUNCTION RVAR1(
197
- REAL (JX*(N-1)+1) RX
198
- INTEGER N
199
- INTEGER JX
200
- )
201
-
202
- /*****************************************************
203
- * math1/rfalib/rstd.f
204
- ****************************************************/
205
- /*
206
- * REAL FUNCTION RSTD(RX,N,JX)
207
- * REAL RX(*)
208
- */
209
- REAL FUNCTION RSTD(
210
- REAL (JX*(N-1)+1) RX
211
- INTEGER N
212
- INTEGER JX
213
- )
214
-
215
- /*****************************************************
216
- * math1/rfalib/rstd0.f
217
- ****************************************************/
218
- /*
219
- * REAL FUNCTION RSTD0(RX,N,JX)
220
- * REAL RX(*)
221
- */
222
- REAL FUNCTION RSTD0(
223
- REAL (JX*(N-1)+1) RX
224
- INTEGER N
225
- INTEGER JX
226
- )
227
-
228
- /*****************************************************
229
- * math1/rfalib/rstd1.f
230
- ****************************************************/
231
- /*
232
- * REAL FUNCTION RSTD1(RX,N,JX)
233
- * REAL RX(*)
234
- */
235
- REAL FUNCTION RSTD1(
236
- REAL (JX*(N-1)+1) RX
237
- INTEGER N
238
- INTEGER JX
239
- )
240
-
241
- /*****************************************************
242
- * math1/rfalib/rrms.f
243
- ****************************************************/
244
- /*
245
- * REAL FUNCTION RRMS(RX,N,JX)
246
- * REAL RX(*)
247
- */
248
- REAL FUNCTION RRMS(
249
- REAL (JX*(N-1)+1) RX
250
- INTEGER N
251
- INTEGER JX
252
- )
253
-
254
- /*****************************************************
255
- * math1/rfalib/rrms0.f
256
- ****************************************************/
257
- /*
258
- * REAL FUNCTION RRMS0(RX,N,JX)
259
- * REAL RX(*)
260
- */
261
- REAL FUNCTION RRMS0(
262
- REAL (JX*(N-1)+1) RX
263
- INTEGER N
264
- INTEGER JX
265
- )
266
-
267
- /*****************************************************
268
- * math1/rfalib/rrms1.f
269
- ****************************************************/
270
- /*
271
- * REAL FUNCTION RRMS1(RX,N,JX)
272
- * REAL RX(*)
273
- */
274
- REAL FUNCTION RRMS1(
275
- REAL (JX*(N-1)+1) RX
276
- INTEGER N
277
- INTEGER JX
278
- )
279
-
280
- /*****************************************************
281
- * math1/rfalib/ramp.f
282
- ****************************************************/
283
- /*
284
- * REAL FUNCTION RAMP(RX,N,JX)
285
- * REAL RX(*)
286
- */
287
- REAL FUNCTION RAMP(
288
- REAL (JX*(N-1)+1) RX
289
- INTEGER N
290
- INTEGER JX
291
- )
292
-
293
- /*****************************************************
294
- * math1/rfalib/ramp0.f
295
- ****************************************************/
296
- /*
297
- * REAL FUNCTION RAMP0(RX,N,JX)
298
- * REAL RX(*)
299
- */
300
- REAL FUNCTION RAMP0(
301
- REAL (JX*(N-1)+1) RX
302
- INTEGER N
303
- INTEGER JX
304
- )
305
-
306
- /*****************************************************
307
- * math1/rfalib/ramp1.f
308
- ****************************************************/
309
- /*
310
- * REAL FUNCTION RAMP1(RX,N,JX)
311
- * REAL RX(*)
312
- */
313
- REAL FUNCTION RAMP1(
314
- REAL (JX*(N-1)+1) RX
315
- INTEGER N
316
- INTEGER JX
317
- )
318
-
319
- /*****************************************************
320
- * math1/rfalib/rvmax.f
321
- ****************************************************/
322
- /* NB: (RVMAX) RX size is given as NS(1)*NS(2)*...*NS(ND) */
323
- /*
324
- * REAL FUNCTION RVMAX(RX,NS,NP,NQ,ND)
325
- * REAL RX(*)
326
- * INTEGER NS(*),NP(*),NQ(*)
327
- */
328
- REAL FUNCTION RVMAX(
329
- REAL (*) RX
330
- INTEGER (ND) NS
331
- INTEGER (ND) NP
332
- INTEGER (ND) NQ
333
- INTEGER ND
334
- )
335
-
336
- /*****************************************************
337
- * math1/rfalib/rvmax0.f
338
- ****************************************************/
339
- /* NB: (RVMAX0) RX size is given as NS(1)*NS(2)*...*NS(ND) */
340
- /*
341
- * REAL FUNCTION RVMAX0(RX,NS,NP,NQ,ND)
342
- * REAL RX(*)
343
- * INTEGER NS(*),NP(*),NQ(*)
344
- */
345
- REAL FUNCTION RVMAX0(
346
- REAL (*) RX
347
- INTEGER (ND) NS
348
- INTEGER (ND) NP
349
- INTEGER (ND) NQ
350
- INTEGER ND
351
- )
352
-
353
- /*****************************************************
354
- * math1/rfalib/rvmin.f
355
- ****************************************************/
356
- /* NB: (MVMIN) RX size is given as NS(1)*NS(2)*...*NS(ND) */
357
- /*
358
- * REAL FUNCTION RVMIN(RX,NS,NP,NQ,ND)
359
- * REAL RX(*)
360
- * INTEGER NS(*),NP(*),NQ(*)
361
- */
362
- REAL FUNCTION RVMIN(
363
- REAL (*) RX
364
- INTEGER (ND) NS
365
- INTEGER (ND) NP
366
- INTEGER (ND) NQ
367
- INTEGER ND
368
- )
369
-
370
- /*****************************************************
371
- * math1/rfalib/rvmax1.f
372
- ****************************************************/
373
- /* NB: (RVMAX1) RX size is given as NS(1)*NS(2)*...*NS(ND) */
374
- /*
375
- * REAL FUNCTION RVMAX1(RX,NS,NP,NQ,ND)
376
- * REAL RX(*)
377
- * INTEGER NS(*),NP(*),NQ(*)
378
- */
379
- REAL FUNCTION RVMAX1(
380
- REAL (*) RX
381
- INTEGER (ND) NS
382
- INTEGER (ND) NP
383
- INTEGER (ND) NQ
384
- INTEGER ND
385
- )
386
-
387
- /*****************************************************
388
- * math1/rfalib/rvmin1.f
389
- ****************************************************/
390
- /* NB: (RVMIN1) RX size is given as NS(1)*NS(2)*...*NS(ND) */
391
- /*
392
- * REAL FUNCTION RVMIN1(RX,NS,NP,NQ,ND)
393
- * REAL RX(*)
394
- * INTEGER NS(*),NP(*),NQ(*)
395
- */
396
- REAL FUNCTION RVMIN1(
397
- REAL (*) RX
398
- INTEGER (ND) NS
399
- INTEGER (ND) NP
400
- INTEGER (ND) NQ
401
- INTEGER ND
402
- )
403
-
404
- /*****************************************************
405
- * math1/rfalib/rvmin0.f
406
- ****************************************************/
407
- /* NB: (RVMIN0) RX size is given as NS(1)*NS(2)*...*NS(ND) */
408
- /*
409
- * REAL FUNCTION RVMIN0(RX,NS,NP,NQ,ND)
410
- * REAL RX(*)
411
- * INTEGER NS(*),NP(*),NQ(*)
412
- */
413
- REAL FUNCTION RVMIN0(
414
- REAL (*) RX
415
- INTEGER (ND) NS
416
- INTEGER (ND) NP
417
- INTEGER (ND) NQ
418
- INTEGER ND
419
- )
420
-