ruby-dcl 1.7.1 → 1.8.0

Sign up to get free protection for your applications and to get access to all the features.
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
-