ruby-dcl 1.6.3.1 → 1.7.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (43) hide show
  1. data/.gitignore +17 -0
  2. data/ChangeLog +57 -1
  3. data/Gemfile +4 -0
  4. data/GenWrapper/Makefile +1 -0
  5. data/GenWrapper/dcl_rb_heading +2 -8
  6. data/GenWrapper/elim_ary_size.rb +1 -1
  7. data/GenWrapper/proto/Makefile +17 -16
  8. data/GenWrapper/proto/grph1_sgpack.fp +367 -1
  9. data/GenWrapper/proto/grph1_stpack.fp +45 -1
  10. data/GenWrapper/proto/grph1_swpack.fp +70 -1
  11. data/GenWrapper/proto/grph2_uipack.fp +508 -0
  12. data/GenWrapper/proto/math1_clsplib.fp +74 -0
  13. data/GenWrapper/proto/misc1_randlib.fp +15 -1
  14. data/README.md +29 -0
  15. data/Rakefile +18 -38
  16. data/dcl_narrayed_funcs.c +23 -22
  17. data/dcl_rubydcloriginal.c +21 -21
  18. data/demo/grph2/uipack/uipk01.rb +38 -0
  19. data/demo/grph2/uipack/uipk02.rb +48 -0
  20. data/demo/grph2/umpack/test09_2.rb +89 -0
  21. data/demo/math1/clsplib/cslb01.rb +55 -0
  22. data/extconf.rb +16 -48
  23. data/grph1_sgpack.c +1166 -0
  24. data/grph1_stpack.c +141 -0
  25. data/grph1_swpack.c +182 -0
  26. data/grph2_uipack.c +1456 -0
  27. data/init.c.default +8 -0
  28. data/lib/.keepme +0 -0
  29. data/lib/dcl/dcl.rb +5578 -0
  30. data/lib/dcl/version.rb +3 -0
  31. data/lib/dcl.rb +2 -5084
  32. data/math1_clsplib.c +329 -0
  33. data/misc1_randlib.c +37 -0
  34. data/ruby-dcl.gemspec +30 -0
  35. metadata +343 -352
  36. data/GenWrapper/etc/Mk_proto +0 -375
  37. data/GenWrapper/etc/dcl_gen +0 -13
  38. data/GenWrapper/etc/p_init +0 -410
  39. data/GenWrapper/proto/math2_shtlib.fp_old +0 -1294
  40. data/README_old +0 -79
  41. data/dummy.c +0 -9
  42. data/grph1_zgpack.c.org +0 -141
  43. data/init.c.gtk +0 -189
data/GenWrapper/etc/p_init DELETED
@@ -1,410 +0,0 @@
1
- /*
2
- * $Id: p_init,v 1.1.1.1 2011-02-23 07:21:28 horinout Exp $
3
- */
4
-
5
- void
6
- Init_dcl()
7
- {
8
- /* for Num::DCl **
9
- mNum = rb_define_module("Num");
10
- mDCL = rb_define_module_under(mNum, "DCL");
11
- */
12
- mDCL = rb_define_module("DCL");
13
-
14
- /*** grph2 ***/
15
- /* grpack */
16
- rb_define_module_function(mDCL, "gropn", dcl_gropn, 1);
17
- rb_define_module_function(mDCL, "grcls", dcl_grcls, 0);
18
- rb_define_module_function(mDCL, "grfrm", dcl_grfrm, 0);
19
- rb_define_module_function(mDCL, "grswnd", dcl_grswnd, 4);
20
- rb_define_module_function(mDCL, "grsvpt", dcl_grsvpt, 4);
21
- rb_define_module_function(mDCL, "grstrn", dcl_grstrn, 1);
22
- rb_define_module_function(mDCL, "grstrf", dcl_grstrf, 0);
23
- rb_define_module_function(mDCL, "grfig", dcl_grfig, 0);
24
- rb_define_module_function(mDCL, "grsmpl", dcl_grsmpl, 3);
25
- rb_define_module_function(mDCL, "grssim", dcl_grssim, 3);
26
- rb_define_module_function(mDCL, "grstxy", dcl_grstxy, 4);
27
- /* ucpack */
28
- rb_define_module_function(mDCL, "ucxacl", dcl_ucxacl, 3);
29
- rb_define_module_function(mDCL, "ucxady", dcl_ucxady, 3);
30
- rb_define_module_function(mDCL, "ucxamn", dcl_ucxamn, 3);
31
- rb_define_module_function(mDCL, "ucxayr", dcl_ucxayr, 3);
32
- rb_define_module_function(mDCL, "ucyacl", dcl_ucyacl, 3);
33
- rb_define_module_function(mDCL, "ucyady", dcl_ucyady, 3);
34
- rb_define_module_function(mDCL, "ucyamn", dcl_ucyamn, 3);
35
- rb_define_module_function(mDCL, "ucyayr", dcl_ucyayr, 3);
36
- /* udpack */
37
- rb_define_module_function(mDCL, "udcntr", dcl_udcntr, 4);
38
- rb_define_module_function(mDCL, "udsfmt", dcl_udsfmt, 1);
39
- rb_define_module_function(mDCL, "uddclv", dcl_uddclv, 1);
40
- rb_define_module_function(mDCL, "udgcla", dcl_udgcla, 3);
41
- rb_define_module_function(mDCL, "udgclb", dcl_udgclb, 5);
42
- rb_define_module_function(mDCL, "udsclv", dcl_udsclv, 5);
43
- rb_define_module_function(mDCL, "udiset", dcl_udiset, 2);
44
- rb_define_module_function(mDCL, "udlset", dcl_udlset, 2);
45
- rb_define_module_function(mDCL, "udrset", dcl_udrset, 2);
46
- /* uepack */
47
- rb_define_module_function(mDCL, "ueitlv", dcl_ueitlv, 0);
48
- rb_define_module_function(mDCL, "uestlv", dcl_uestlv, 3);
49
- rb_define_module_function(mDCL, "uestln", dcl_uestln, 3);
50
- rb_define_module_function(mDCL, "uetone", dcl_uetone, 4);
51
- rb_define_module_function(mDCL, "uetonf", dcl_uetonf, 4);
52
- /* ugpack */
53
- rb_define_module_function(mDCL, "ugvect", dcl_ugvect, 6);
54
- rb_define_module_function(mDCL, "uglset", dcl_uglset, 2);
55
- rb_define_module_function(mDCL, "ugrset", dcl_ugrset, 2);
56
- rb_define_module_function(mDCL, "ugsut", dcl_ugsut, 2);
57
- /* uhpack */
58
- rb_define_module_function(mDCL, "uhbra", dcl_uhbra, 4);
59
- rb_define_module_function(mDCL, "uhbrf", dcl_uhbrf, 4);
60
- rb_define_module_function(mDCL, "uhbrl", dcl_uhbrl, 3);
61
- rb_define_module_function(mDCL, "uhbxa", dcl_uhbxa, 4);
62
- rb_define_module_function(mDCL, "uhbxf", dcl_uhbxf, 4);
63
- rb_define_module_function(mDCL, "uhbxl", dcl_uhbxl, 3);
64
- rb_define_module_function(mDCL, "uhdif", dcl_uhdif, 4);
65
- rb_define_module_function(mDCL, "uherb", dcl_uherb, 4);
66
- /* ulpack */
67
- rb_define_module_function(mDCL, "uliset", dcl_uliset, 2);
68
- rb_define_module_function(mDCL, "ulsxbl", dcl_ulsxbl, 2);
69
- rb_define_module_function(mDCL, "ulsybl", dcl_ulsybl, 2);
70
- rb_define_module_function(mDCL, "ulxlog", dcl_ulxlog, 3);
71
- rb_define_module_function(mDCL, "ulxsfm", dcl_ulxsfm, 1);
72
- rb_define_module_function(mDCL, "ulylog", dcl_ulylog, 3);
73
- rb_define_module_function(mDCL, "ulysfm", dcl_ulysfm, 1);
74
- /* umpack */
75
- rb_define_module_function(mDCL, "umpmap", dcl_umpmap, 1);
76
- rb_define_module_function(mDCL, "umpgrd", dcl_umpgrd, 0);
77
- rb_define_module_function(mDCL, "umpglb", dcl_umpglb, 0);
78
- rb_define_module_function(mDCL, "umpfit", dcl_umpfit, 0);
79
- rb_define_module_function(mDCL, "umplim", dcl_umplim, 0);
80
- rb_define_module_function(mDCL, "umiset", dcl_umiset, 2);
81
- rb_define_module_function(mDCL, "umlset", dcl_umlset, 2);
82
- rb_define_module_function(mDCL, "umrset", dcl_umrset, 2);
83
- /* uspack */
84
- rb_define_module_function(mDCL, "ussttl", dcl_ussttl, 4);
85
- rb_define_module_function(mDCL, "usgrph", dcl_usgrph, 3);
86
- rb_define_module_function(mDCL, "usspnt", dcl_usspnt, 3);
87
- rb_define_module_function(mDCL, "uspfit", dcl_uspfit, 0);
88
- rb_define_module_function(mDCL, "usdaxs", dcl_usdaxs, 0);
89
- rb_define_module_function(mDCL, "uscset", dcl_uscset, 2);
90
- rb_define_module_function(mDCL, "uslset", dcl_uslset, 2);
91
- rb_define_module_function(mDCL, "usrset", dcl_usrset, 2);
92
- rb_define_module_function(mDCL, "usyaxs", dcl_usyaxs, 1);
93
- /* uupack */
94
- rb_define_module_function(mDCL, "uulin", dcl_uulin, 3);
95
- rb_define_module_function(mDCL, "uulinz", dcl_uulinz, 5);
96
- rb_define_module_function(mDCL, "uuslni", dcl_uuslni, 1);
97
- rb_define_module_function(mDCL, "uuslnt", dcl_uuslnt, 1);
98
- rb_define_module_function(mDCL, "uumrk", dcl_uumrk, 3);
99
- rb_define_module_function(mDCL, "uumrkz", dcl_uumrkz, 6);
100
- rb_define_module_function(mDCL, "uusmki", dcl_uusmki, 1);
101
- rb_define_module_function(mDCL, "uusmks", dcl_uusmks, 1);
102
- rb_define_module_function(mDCL, "uusmkt", dcl_uusmkt, 1);
103
- rb_define_module_function(mDCL, "uusebi", dcl_uusebi, 1);
104
- rb_define_module_function(mDCL, "uusebt", dcl_uusebt, 1);
105
- rb_define_module_function(mDCL, "uusarp", dcl_uusarp, 2);
106
- rb_define_module_function(mDCL, "uusbrs", dcl_uusbrs, 1);
107
- rb_define_module_function(mDCL, "uusidv", dcl_uusidv, 2);
108
- /* uvpack */
109
- rb_define_module_function(mDCL, "uvbra", dcl_uvbra, 4);
110
- rb_define_module_function(mDCL, "uvbrf", dcl_uvbrf, 4);
111
- rb_define_module_function(mDCL, "uvbrl", dcl_uvbrl, 3);
112
- rb_define_module_function(mDCL, "uvbxa", dcl_uvbxa, 4);
113
- rb_define_module_function(mDCL, "uvbxf", dcl_uvbxf, 4);
114
- rb_define_module_function(mDCL, "uvbxl", dcl_uvbxl, 3);
115
- rb_define_module_function(mDCL, "uvdif", dcl_uvdif, 4);
116
- rb_define_module_function(mDCL, "uverb", dcl_uverb, 4);
117
- /* uwpack */
118
- rb_define_module_function(mDCL, "uwsgxb", dcl_uwsgxb, 3);
119
- rb_define_module_function(mDCL, "uwsgya", dcl_uwsgya, 2);
120
- /* uxpack */
121
- rb_define_module_function(mDCL, "uxaxdv", dcl_uxaxdv, 3);
122
- rb_define_module_function(mDCL, "uxaxlb", dcl_uxaxlb, 7);
123
- rb_define_module_function(mDCL, "uxsaxs", dcl_uxsaxs, 1);
124
- rb_define_module_function(mDCL, "uxmttl", dcl_uxmttl, 3);
125
- rb_define_module_function(mDCL, "uxsttl", dcl_uxsttl, 3);
126
- rb_define_module_function(mDCL, "uxsfmt", dcl_uxsfmt, 1);
127
- /* uypack */
128
- rb_define_module_function(mDCL, "uyaxdv", dcl_uyaxdv, 3);
129
- rb_define_module_function(mDCL, "uyaxlb", dcl_uyaxlb, 7);
130
- rb_define_module_function(mDCL, "uysaxs", dcl_uysaxs, 1);
131
- rb_define_module_function(mDCL, "uysttl", dcl_uysttl, 3);
132
- rb_define_module_function(mDCL, "uysfmt", dcl_uysfmt, 1);
133
- /* uzpack */
134
- rb_define_module_function(mDCL, "uzfact", dcl_uzfact, 1);
135
- rb_define_module_function(mDCL, "uzinit", dcl_uzinit, 0);
136
- rb_define_module_function(mDCL, "uziset", dcl_uziset, 2);
137
- rb_define_module_function(mDCL, "uzlset", dcl_uzlset, 2);
138
- rb_define_module_function(mDCL, "uzrset", dcl_uzrset, 2);
139
- /*** grph1 ***/
140
- /* csgi */
141
- rb_define_module_function(mDCL, "csgi", dcl_csgi, 1);
142
- /* scpack */
143
- rb_define_module_function(mDCL, "scsvpt", dcl_scsvpt, 6);
144
- rb_define_module_function(mDCL, "scswnd", dcl_scswnd, 6);
145
- rb_define_module_function(mDCL, "scstrn", dcl_scstrn, 1);
146
- rb_define_module_function(mDCL, "scstrf", dcl_scstrf, 0);
147
- rb_define_module_function(mDCL, "scseye", dcl_scseye, 3);
148
- rb_define_module_function(mDCL, "scslog", dcl_scslog, 3);
149
- rb_define_module_function(mDCL, "scsorg", dcl_scsorg, 4);
150
- rb_define_module_function(mDCL, "scsobj", dcl_scsobj, 3);
151
- rb_define_module_function(mDCL, "scsprj", dcl_scsprj, 0);
152
- rb_define_module_function(mDCL, "scplu", dcl_scplu, 4);
153
- rb_define_module_function(mDCL, "scspli", dcl_scspli, 1);
154
- rb_define_module_function(mDCL, "scspln", dcl_scspln, 3);
155
- rb_define_module_function(mDCL, "scpmu", dcl_scpmu, 4);
156
- rb_define_module_function(mDCL, "scspmi", dcl_scspmi, 1);
157
- rb_define_module_function(mDCL, "scspms", dcl_scspms, 1);
158
- rb_define_module_function(mDCL, "scspmt", dcl_scspmt, 1);
159
- rb_define_module_function(mDCL, "sctnu", dcl_sctnu, 3);
160
- rb_define_module_function(mDCL, "scstnp", dcl_scstnp, 2);
161
- /* sgpack */
162
- rb_define_module_function(mDCL, "sgopn", dcl_sgopn, 1);
163
- rb_define_module_function(mDCL, "sgcls", dcl_sgcls, 0);
164
- rb_define_module_function(mDCL, "sgfrm", dcl_sgfrm, 0);
165
- rb_define_module_function(mDCL, "sgpwsn", dcl_sgpwsn, 0);
166
- rb_define_module_function(mDCL, "sgiset", dcl_sgiset, 2);
167
- rb_define_module_function(mDCL, "sglset", dcl_sglset, 2);
168
- rb_define_module_function(mDCL, "sgrset", dcl_sgrset, 2);
169
- rb_define_module_function(mDCL, "sgqwnd", dcl_sgqwnd, 0);
170
- rb_define_module_function(mDCL, "sgswnd", dcl_sgswnd, 4);
171
- rb_define_module_function(mDCL, "sgsvpt", dcl_sgsvpt, 4);
172
- rb_define_module_function(mDCL, "sgstrn", dcl_sgstrn, 1);
173
- rb_define_module_function(mDCL, "sgstrf", dcl_sgstrf, 0);
174
- rb_define_module_function(mDCL, "sglau", dcl_sglau, 4);
175
- rb_define_module_function(mDCL, "sglav", dcl_sglav, 4);
176
- rb_define_module_function(mDCL, "sglazu", dcl_sglazu, 6);
177
- rb_define_module_function(mDCL, "sgslai", dcl_sgslai, 1);
178
- rb_define_module_function(mDCL, "sgslat", dcl_sgslat, 1);
179
- rb_define_module_function(mDCL, "sglnu", dcl_sglnu, 4);
180
- rb_define_module_function(mDCL, "sglnv", dcl_sglnv, 4);
181
- rb_define_module_function(mDCL, "sglnzu", dcl_sglnzu, 5);
182
- rb_define_module_function(mDCL, "sglnzv", dcl_sglnzv, 5);
183
- rb_define_module_function(mDCL, "sgslni", dcl_sgslni, 1);
184
- rb_define_module_function(mDCL, "sgplu", dcl_sgplu, 3);
185
- rb_define_module_function(mDCL, "sgplv", dcl_sgplv, 3);
186
- rb_define_module_function(mDCL, "sgplzu", dcl_sgplzu, 5);
187
- rb_define_module_function(mDCL, "sgplzv", dcl_sgplzv, 5);
188
- rb_define_module_function(mDCL, "sgnplc", dcl_sgnplc, 0);
189
- rb_define_module_function(mDCL, "sgsplc", dcl_sgsplc, 1);
190
- rb_define_module_function(mDCL, "sgspli", dcl_sgspli, 1);
191
- rb_define_module_function(mDCL, "sgspls", dcl_sgspls, 1);
192
- rb_define_module_function(mDCL, "sgsplt", dcl_sgsplt, 1);
193
- rb_define_module_function(mDCL, "sgpmu", dcl_sgpmu, 3);
194
- rb_define_module_function(mDCL, "sgpmv", dcl_sgpmv, 3);
195
- rb_define_module_function(mDCL, "sgpmzu", dcl_sgpmzu, 6);
196
- rb_define_module_function(mDCL, "sgpmzv", dcl_sgpmzv, 6);
197
- rb_define_module_function(mDCL, "sgspmi", dcl_sgspmi, 1);
198
- rb_define_module_function(mDCL, "sgspmt", dcl_sgspmt, 1);
199
- rb_define_module_function(mDCL, "sgspms", dcl_sgspms, 1);
200
- rb_define_module_function(mDCL, "sgtnu", dcl_sgtnu, 3);
201
- rb_define_module_function(mDCL, "sgtnv", dcl_sgtnv, 3);
202
- rb_define_module_function(mDCL, "sgtnzu", dcl_sgtnzu, 4);
203
- rb_define_module_function(mDCL, "sgstnp", dcl_sgstnp, 1);
204
- rb_define_module_function(mDCL, "sgtxr", dcl_sgtxr, 3);
205
- rb_define_module_function(mDCL, "sgtxu", dcl_sgtxu, 3);
206
- rb_define_module_function(mDCL, "sgtxv", dcl_sgtxv, 3);
207
- rb_define_module_function(mDCL, "sgtxzr", dcl_sgtxzr, 7);
208
- rb_define_module_function(mDCL, "sgtxzu", dcl_sgtxzu, 7);
209
- rb_define_module_function(mDCL, "sgtxzv", dcl_sgtxzv, 7);
210
- rb_define_module_function(mDCL, "sgstxc", dcl_sgstxc, 1);
211
- rb_define_module_function(mDCL, "sgstxi", dcl_sgstxi, 1);
212
- rb_define_module_function(mDCL, "sgstxr", dcl_sgstxr, 1);
213
- rb_define_module_function(mDCL, "sgstxs", dcl_sgstxs, 1);
214
- rb_define_module_function(mDCL, "sgstxy", dcl_sgstxy, 4);
215
- rb_define_module_function(mDCL, "sgssim", dcl_sgssim, 3);
216
- rb_define_module_function(mDCL, "sgsmpl", dcl_sgsmpl, 3);
217
- rb_define_module_function(mDCL, "sgtrnl", dcl_sgtrnl, 1);
218
- rb_define_module_function(mDCL, "isgtrc", dcl_isgtrc, 1);
219
- /* slpack */
220
- rb_define_module_function(mDCL, "sldiv", dcl_sldiv, 3);
221
- rb_define_module_function(mDCL, "slmgn", dcl_slmgn, 4);
222
- rb_define_module_function(mDCL, "slform", dcl_slform, 2);
223
- rb_define_module_function(mDCL, "slrat", dcl_slrat, 2);
224
- rb_define_module_function(mDCL, "slsttl", dcl_slsttl, 6);
225
- rb_define_module_function(mDCL, "slpvpr", dcl_slpvpr, 1);
226
- rb_define_module_function(mDCL, "slpwwr", dcl_slpwwr, 1);
227
- /* stpack */
228
- rb_define_module_function(mDCL, "stftrf", dcl_stftrf, 2);
229
- /* swpack */
230
- rb_define_module_function(mDCL, "swistx", dcl_swistx, 2);
231
- rb_define_module_function(mDCL, "swlstx", dcl_swlstx, 2);
232
- /* szpack */
233
- /* kuro for test **
234
- rb_define_module_function(mDCL, "szl3op", dcl_szl3op, 1);
235
- rb_define_module_function(mDCL, "szl3cl", dcl_szl3cl, 0);
236
- rb_define_module_function(mDCL, "szl3zu", dcl_szl3zu, 4);
237
- rb_define_module_function(mDCL, "szl3zv", dcl_szl3zv, 4);
238
- rb_define_module_function(mDCL, "szt3op", dcl_szt3op, 2);
239
- rb_define_module_function(mDCL, "szt3cl", dcl_szt3cl, 0);
240
- rb_define_module_function(mDCL, "szt3zu", dcl_szt3zu, 3);
241
- rb_define_module_function(mDCL, "szt3zv", dcl_szt3zv, 3);
242
- rb_define_module_function(mDCL, "szopl3", dcl_szopl3, 0);
243
- rb_define_module_function(mDCL, "szcll3", dcl_szcll3, 0);
244
- rb_define_module_function(mDCL, "szmvl3", dcl_szmvl3, 3);
245
- rb_define_module_function(mDCL, "szpll3", dcl_szpll3, 3);
246
- ** kuro for test */
247
- /*** math2 ***/
248
- /* fftlib */
249
- rb_define_module_function(mDCL, "ezffti", dcl_ezffti, 1);
250
- rb_define_module_function(mDCL, "ezfftf", dcl_ezfftf, 3);
251
- rb_define_module_function(mDCL, "ezfftb", dcl_ezfftb, 5);
252
- rb_define_module_function(mDCL, "rffti", dcl_rffti, 1);
253
- rb_define_module_function(mDCL, "rfftf", dcl_rfftf, 3);
254
- rb_define_module_function(mDCL, "rfftb", dcl_rfftb, 3);
255
- /* intrlib */
256
- rb_define_module_function(mDCL, "vrintr", dcl_vrintr, 3);
257
- /* rnmlib */
258
- rb_define_module_function(mDCL, "vrrnm", dcl_vrrnm, 5);
259
- /* vstlib */
260
- rb_define_module_function(mDCL, "vs1int", dcl_vs1int, 1);
261
- rb_define_module_function(mDCL, "vs1din", dcl_vs1din, 4);
262
- rb_define_module_function(mDCL, "vs1out", dcl_vs1out, 3);
263
- rb_define_module_function(mDCL, "vs2int", dcl_vs2int, 2);
264
- rb_define_module_function(mDCL, "vs2din", dcl_vs2din, 6);
265
- rb_define_module_function(mDCL, "vs2out", dcl_vs2out, 4);
266
- /*** math1 ***/
267
- /* blklib */
268
- rb_define_module_function(mDCL, "iblkgt", dcl_iblkgt, 3);
269
- rb_define_module_function(mDCL, "iblkge", dcl_iblkge, 3);
270
- rb_define_module_function(mDCL, "iblklt", dcl_iblklt, 3);
271
- rb_define_module_function(mDCL, "iblkle", dcl_iblkle, 3);
272
- /* chrlib */
273
- rb_define_module_function(mDCL, "cladj", dcl_cladj, 1);
274
- rb_define_module_function(mDCL, "cradj", dcl_cradj, 1);
275
- rb_define_module_function(mDCL, "crvrs", dcl_crvrs, 1);
276
- rb_define_module_function(mDCL, "lenb", dcl_lenb, 1);
277
- rb_define_module_function(mDCL, "lenc", dcl_lenc, 1);
278
- rb_define_module_function(mDCL, "leny", dcl_leny, 1);
279
- rb_define_module_function(mDCL, "lenz", dcl_lenz, 1);
280
- /* fnclib */
281
- rb_define_module_function(mDCL, "igus", dcl_igus, 1);
282
- rb_define_module_function(mDCL, "imod", dcl_imod, 2);
283
- rb_define_module_function(mDCL, "rd2r", dcl_rd2r, 1);
284
- rb_define_module_function(mDCL, "rr2d", dcl_rr2d, 1);
285
- rb_define_module_function(mDCL, "rexp", dcl_rexp, 3);
286
- rb_define_module_function(mDCL, "rfpi", dcl_rfpi, 0);
287
- rb_define_module_function(mDCL, "rmod", dcl_rmod, 2);
288
- /* gnmlib */
289
- rb_define_module_function(mDCL, "gnlt", dcl_gnlt, 1);
290
- rb_define_module_function(mDCL, "gnle", dcl_gnle, 1);
291
- rb_define_module_function(mDCL, "gngt", dcl_gngt, 1);
292
- rb_define_module_function(mDCL, "gnge", dcl_gnge, 1);
293
- rb_define_module_function(mDCL, "rgnlt", dcl_rgnlt, 1);
294
- rb_define_module_function(mDCL, "rgnle", dcl_rgnle, 1);
295
- rb_define_module_function(mDCL, "rgngt", dcl_rgngt, 1);
296
- rb_define_module_function(mDCL, "rgnge", dcl_rgnge, 1);
297
- /* ifalib */
298
- rb_define_module_function(mDCL, "imax", dcl_imax, 3);
299
- rb_define_module_function(mDCL, "imin", dcl_imin, 3);
300
- rb_define_module_function(mDCL, "isum", dcl_isum, 3);
301
- /* indxlib */
302
- rb_define_module_function(mDCL, "indxif", dcl_indxif, 4);
303
- rb_define_module_function(mDCL, "indxil", dcl_indxil, 4);
304
- rb_define_module_function(mDCL, "nindxi", dcl_nindxi, 4);
305
- rb_define_module_function(mDCL, "indxrf", dcl_indxrf, 4);
306
- rb_define_module_function(mDCL, "indxrl", dcl_indxrl, 4);
307
- rb_define_module_function(mDCL, "nindxr", dcl_nindxr, 4);
308
- rb_define_module_function(mDCL, "indxcf", dcl_indxcf, 4);
309
- rb_define_module_function(mDCL, "indxcl", dcl_indxcl, 4);
310
- rb_define_module_function(mDCL, "nindxc", dcl_nindxc, 4);
311
- rb_define_module_function(mDCL, "indxmf", dcl_indxmf, 4);
312
- rb_define_module_function(mDCL, "indxml", dcl_indxml, 4);
313
- rb_define_module_function(mDCL, "nindxm", dcl_nindxm, 4);
314
- /* intlib */
315
- rb_define_module_function(mDCL, "irlt", dcl_irlt, 1);
316
- rb_define_module_function(mDCL, "irle", dcl_irle, 1);
317
- rb_define_module_function(mDCL, "irgt", dcl_irgt, 1);
318
- rb_define_module_function(mDCL, "irge", dcl_irge, 1);
319
- /* lrllib */
320
- rb_define_module_function(mDCL, "lreq", dcl_lreq, 2);
321
- rb_define_module_function(mDCL, "lrne", dcl_lrne, 2);
322
- rb_define_module_function(mDCL, "lrlt", dcl_lrlt, 2);
323
- rb_define_module_function(mDCL, "lrle", dcl_lrle, 2);
324
- rb_define_module_function(mDCL, "lrgt", dcl_lrgt, 2);
325
- rb_define_module_function(mDCL, "lrge", dcl_lrge, 2);
326
- rb_define_module_function(mDCL, "lreqa", dcl_lreqa, 3);
327
- rb_define_module_function(mDCL, "lrnea", dcl_lrnea, 3);
328
- rb_define_module_function(mDCL, "lrlta", dcl_lrlta, 3);
329
- rb_define_module_function(mDCL, "lrlea", dcl_lrlea, 3);
330
- rb_define_module_function(mDCL, "lrgta", dcl_lrgta, 3);
331
- rb_define_module_function(mDCL, "lrgea", dcl_lrgea, 3);
332
- /* rfalib */
333
- rb_define_module_function(mDCL, "rmax", dcl_rmax, 3);
334
- rb_define_module_function(mDCL, "rmin", dcl_rmin, 3);
335
- rb_define_module_function(mDCL, "rsum", dcl_rsum, 3);
336
- rb_define_module_function(mDCL, "rave", dcl_rave, 3);
337
- rb_define_module_function(mDCL, "rvar", dcl_rvar, 3);
338
- rb_define_module_function(mDCL, "rstd", dcl_rstd, 3);
339
- rb_define_module_function(mDCL, "rrms", dcl_rrms, 3);
340
- rb_define_module_function(mDCL, "ramp", dcl_ramp, 3);
341
- rb_define_module_function(mDCL, "rmlt0", dcl_rmlt0, 4);
342
- /* rfblib */
343
- rb_define_module_function(mDCL, "rprd", dcl_rprd, 5);
344
- rb_define_module_function(mDCL, "rcov", dcl_rcov, 5);
345
- rb_define_module_function(mDCL, "rcor", dcl_rcor, 5);
346
- /* sublib */
347
- rb_define_module_function(mDCL, "vignn", dcl_vignn, 2);
348
- rb_define_module_function(mDCL, "vrgnn", dcl_vrgnn, 2);
349
- /* syslib */
350
- rb_define_module_function(mDCL, "gliget", dcl_gliget, 1);
351
- rb_define_module_function(mDCL, "gliset", dcl_gliset, 2);
352
- rb_define_module_function(mDCL, "glistx", dcl_glistx, 2);
353
- rb_define_module_function(mDCL, "gllget", dcl_gllget, 1);
354
- rb_define_module_function(mDCL, "gllset", dcl_gllset, 2);
355
- rb_define_module_function(mDCL, "gllstx", dcl_gllstx, 2);
356
- rb_define_module_function(mDCL, "glrget", dcl_glrget, 1);
357
- rb_define_module_function(mDCL, "glrset", dcl_glrset, 2);
358
- rb_define_module_function(mDCL, "glrstx", dcl_glrstx, 2);
359
- rb_define_module_function(mDCL, "msgdmp", dcl_msgdmp, 3);
360
- /* vialib */
361
- rb_define_module_function(mDCL, "viset", dcl_viset, 4);
362
- rb_define_module_function(mDCL, "viinc", dcl_viinc, 5);
363
- rb_define_module_function(mDCL, "vifct", dcl_vifct, 5);
364
- rb_define_module_function(mDCL, "vicon", dcl_vicon, 5);
365
- rb_define_module_function(mDCL, "iadd", dcl_iadd, 4);
366
- rb_define_module_function(mDCL, "imlt", dcl_imlt, 4);
367
- rb_define_module_function(mDCL, "iset", dcl_iset, 4);
368
- /* viblib */
369
- rb_define_module_function(mDCL, "viadd", dcl_viadd, 6);
370
- rb_define_module_function(mDCL, "visub", dcl_visub, 6);
371
- rb_define_module_function(mDCL, "vimlt", dcl_vimlt, 6);
372
- rb_define_module_function(mDCL, "vidiv", dcl_vidiv, 6);
373
- /* vralib */
374
- rb_define_module_function(mDCL, "vrset", dcl_vrset, 4);
375
- rb_define_module_function(mDCL, "vrinc", dcl_vrinc, 5);
376
- rb_define_module_function(mDCL, "vrfct", dcl_vrfct, 5);
377
- rb_define_module_function(mDCL, "vrcon", dcl_vrcon, 5);
378
- rb_define_module_function(mDCL, "radd", dcl_radd, 4);
379
- rb_define_module_function(mDCL, "rmlt", dcl_rmlt, 4);
380
- rb_define_module_function(mDCL, "rset", dcl_rset, 4);
381
- /* vrblib */
382
- rb_define_module_function(mDCL, "vradd", dcl_vradd, 6);
383
- rb_define_module_function(mDCL, "vrsub", dcl_vrsub, 6);
384
- rb_define_module_function(mDCL, "vrmlt", dcl_vrmlt, 6);
385
- rb_define_module_function(mDCL, "vrdiv", dcl_vrdiv, 6);
386
- /*** misc1 ***/
387
- /* datelib */
388
- rb_define_module_function(mDCL, "date12", dcl_date12, 1);
389
- rb_define_module_function(mDCL, "date21", dcl_date21, 2);
390
- rb_define_module_function(mDCL, "date13", dcl_date13, 1);
391
- rb_define_module_function(mDCL, "date31", dcl_date31, 3);
392
- rb_define_module_function(mDCL, "date32", dcl_date32, 3);
393
- rb_define_module_function(mDCL, "datef1", dcl_datef1, 2);
394
- rb_define_module_function(mDCL, "dateg1", dcl_dateg1, 2);
395
- rb_define_module_function(mDCL, "datef2", dcl_datef2, 3);
396
- rb_define_module_function(mDCL, "dateg2", dcl_dateg2, 4);
397
- rb_define_module_function(mDCL, "datef3", dcl_datef3, 4);
398
- rb_define_module_function(mDCL, "dateg3", dcl_dateg3, 6);
399
- rb_define_module_function(mDCL, "dateq1", dcl_dateq1, 0);
400
- rb_define_module_function(mDCL, "datec1", dcl_datec1, 2);
401
- rb_define_module_function(mDCL, "dateq2", dcl_dateq2, 0);
402
- rb_define_module_function(mDCL, "datec2", dcl_datec2, 3);
403
- rb_define_module_function(mDCL, "datec3", dcl_datec3, 4);
404
- rb_define_module_function(mDCL, "cweek", dcl_cweek, 1);
405
- rb_define_module_function(mDCL, "iweek1", dcl_iweek1, 1);
406
- rb_define_module_function(mDCL, "iweek2", dcl_iweek2, 2);
407
- rb_define_module_function(mDCL, "iweek3", dcl_iweek3, 3);
408
-
409
- }
410
-