source: Sophya/trunk/SophyaExt/CodeMinuit/cfortran/jetset74.h

Last change on this file was 2403, checked in by cmv, 22 years ago

Creation du module de code source de MINUIT (CERNLIB) extrait par CMV

cmv 11/06/2003
File size: 13.2 KB
Line 
1PROTOCCALLSFFUN2(INT,KLU,klu,INT,INT)
2#define KLU(A2,A3) CCALLSFFUN2(KLU,klu,INT,INT,A2,A3)
3
4PROTOCCALLSFFUN2(FLOAT,PLU,plu,INT,INT)
5#define PLU(A2,A3) CCALLSFFUN2(PLU,plu,INT,INT,A2,A3)
6
7PROTOCCALLSFFUN4(FLOAT,PYCTQ2,pyctq2,INT,INT,FLOAT,FLOAT)
8#define PYCTQ2(A2,A3,A4,A5) CCALLSFFUN4(PYCTQ2,pyctq2,INT,INT,FLOAT,FLOAT,A2,A3,A4,A5)
9
10PROTOCCALLSFFUN1(DOUBLE,PYDILN,pydiln,DOUBLE)
11#define PYDILN(A2) CCALLSFFUN1(PYDILN,pydiln,DOUBLE,A2)
12
13PROTOCCALLSFFUN1(INT,LUCHGE,luchge,INT)
14#define LUCHGE(A2) CCALLSFFUN1(LUCHGE,luchge,INT,A2)
15
16PROTOCCALLSFFUN1(INT,LUCOMP,lucomp,INT)
17#define LUCOMP(A2) CCALLSFFUN1(LUCOMP,lucomp,INT,A2)
18
19PROTOCCALLSFFUN1(FLOAT,PYGAMM,pygamm,FLOAT)
20#define PYGAMM(A2) CCALLSFFUN1(PYGAMM,pygamm,FLOAT,A2)
21
22PROTOCCALLSFFUN3(FLOAT,PYHFTH,pyhfth,FLOAT,FLOAT,FLOAT)
23#define PYHFTH(A2,A3,A4) CCALLSFFUN3(PYHFTH,pyhfth,FLOAT,FLOAT,FLOAT,A2,A3,A4)
24
25PROTOCCALLSFFUN3(FLOAT,PYSPEN,pyspen,FLOAT,FLOAT,INT)
26#define PYSPEN(A2,A3,A4) CCALLSFFUN3(PYSPEN,pyspen,FLOAT,FLOAT,INT,A2,A3,A4)
27
28PROTOCCALLSFFUN2(DOUBLE,RKDOT,rkdot,DOUBLEV,DOUBLEV)
29#define RKDOT(A2,A3) CCALLSFFUN2(RKDOT,rkdot,DOUBLEV,DOUBLEV,A2,A3)
30
31PROTOCCALLSFFUN1(DOUBLE,RKRAND,rkrand,INT)
32#define RKRAND(A2) CCALLSFFUN1(RKRAND,rkrand,INT,A2)
33
34PROTOCCALLSFFUN6(COMPLEX,RKZF,rkzf,INT,DOUBLEV,DOUBLEV,DOUBLE,INT,DOUBLEV)
35#define RKZF(A2,A3,A4,A5,A6,A7) CCALLSFFUN6(RKZF,rkzf,INT,DOUBLEV,DOUBLEV,DOUBLE,INT,DOUBLEV,A2,A3,A4,A5,A6,A7)
36
37PROTOCCALLSFFUN3(COMPLEX,RKZPR,rkzpr,INT,DOUBLEV,DOUBLEV)
38#define RKZPR(A2,A3,A4) CCALLSFFUN3(RKZPR,rkzpr,INT,DOUBLEV,DOUBLEV,A2,A3,A4)
39
40PROTOCCALLSFFUN4(COMPLEX,RKZSF,rkzsf,INT,DOUBLEV,INT,DOUBLEV)
41#define RKZSF(A2,A3,A4,A5) CCALLSFFUN4(RKZSF,rkzsf,INT,DOUBLEV,INT,DOUBLEV,A2,A3,A4,A5)
42
43PROTOCCALLSFFUN1(FLOAT,RLU,rlu,INT)
44#define RLU(A2) CCALLSFFUN1(RLU,rlu,INT,A2)
45
46PROTOCCALLSFFUN1(FLOAT,ULALEM,ulalem,FLOAT)
47#define ULALEM(A2) CCALLSFFUN1(ULALEM,ulalem,FLOAT,A2)
48
49PROTOCCALLSFFUN1(FLOAT,ULALPS,ulalps,FLOAT)
50#define ULALPS(A2) CCALLSFFUN1(ULALPS,ulalps,FLOAT,A2)
51
52PROTOCCALLSFFUN2(FLOAT,ULANGL,ulangl,FLOAT,FLOAT)
53#define ULANGL(A2,A3) CCALLSFFUN2(ULANGL,ulangl,FLOAT,FLOAT,A2,A3)
54
55PROTOCCALLSFFUN1(FLOAT,ULMASS,ulmass,INT)
56#define ULMASS(A2) CCALLSFFUN1(ULMASS,ulmass,INT,A2)
57
58PROTOCCALLSFSUB5(LU1ENT,lu1ent,INT,INT,FLOAT,FLOAT,FLOAT)
59#define LU1ENT(A1,A2,A3,A4,A5) CCALLSFSUB5(LU1ENT,lu1ent,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
60
61PROTOCCALLSFSUB4(LU2ENT,lu2ent,INT,INT,INT,FLOAT)
62#define LU2ENT(A1,A2,A3,A4) CCALLSFSUB4(LU2ENT,lu2ent,INT,INT,INT,FLOAT,A1,A2,A3,A4)
63
64PROTOCCALLSFSUB7(LU3ENT,lu3ent,INT,INT,INT,INT,FLOAT,FLOAT,FLOAT)
65#define LU3ENT(A1,A2,A3,A4,A5,A6,A7) CCALLSFSUB7(LU3ENT,lu3ent,INT,INT,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6,A7)
66
67PROTOCCALLSFSUB11(LU4ENT,lu4ent,INT,INT,INT,INT,INT,FLOAT,FLOAT,FLOAT,FLOAT,FLOAT,FLOAT)
68#define LU4ENT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11) CCALLSFSUB11(LU4ENT,lu4ent,INT,INT,INT,INT,INT,FLOAT,FLOAT,FLOAT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
69
70PROTOCCALLSFSUB1(LUBOEI,luboei,INT)
71#define LUBOEI(A1) CCALLSFSUB1(LUBOEI,luboei,INT,A1)
72
73PROTOCCALLSFSUB1(LUCELL,lucell,PINT)
74#define LUCELL(A1) CCALLSFSUB1(LUCELL,lucell,PINT,A1)
75
76PROTOCCALLSFSUB1(LUCLUS,luclus,PINT)
77#define LUCLUS(A1) CCALLSFSUB1(LUCLUS,luclus,PINT,A1)
78
79PROTOCCALLSFSUB1(LUDECY,ludecy,INT)
80#define LUDECY(A1) CCALLSFSUB1(LUDECY,ludecy,INT,A1)
81
82PROTOCCALLSFSUB1(LUEDIT,luedit,INT)
83#define LUEDIT(A1) CCALLSFSUB1(LUEDIT,luedit,INT,A1)
84
85PROTOCCALLSFSUB2(LUEEVT,lueevt,INT,FLOAT)
86#define LUEEVT(A1,A2) CCALLSFSUB2(LUEEVT,lueevt,INT,FLOAT,A1,A2)
87
88PROTOCCALLSFSUB2(LUERRM,luerrm,INT,BYTE)
89#define LUERRM(A1,A2) CCALLSFSUB2(LUERRM,luerrm,INT,BYTE,A1,A2)
90
91PROTOCCALLSFSUB0(LUEXEC,luexec)
92#define LUEXEC() CCALLSFSUB0(LUEXEC,luexec)
93
94PROTOCCALLSFSUB4(LUFOWO,lufowo,PFLOAT,PFLOAT,PFLOAT,PFLOAT)
95#define LUFOWO(A1,A2,A3,A4) CCALLSFSUB4(LUFOWO,lufowo,PFLOAT,PFLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4)
96
97PROTOCCALLSFSUB1(LUGIVE,lugive,BYTE)
98#define LUGIVE(A1) CCALLSFSUB1(LUGIVE,lugive,BYTE,A1)
99
100PROTOCCALLSFSUB1(LUHEPC,luhepc,INT)
101#define LUHEPC(A1) CCALLSFSUB1(LUHEPC,luhepc,INT,A1)
102
103PROTOCCALLSFSUB1(LUINDF,luindf,INT)
104#define LUINDF(A1) CCALLSFSUB1(LUINDF,luindf,INT,A1)
105
106PROTOCCALLSFSUB2(LUJMAS,lujmas,PFLOAT,PFLOAT)
107#define LUJMAS(A1,A2) CCALLSFSUB2(LUJMAS,lujmas,PFLOAT,PFLOAT,A1,A2)
108
109PROTOCCALLSFSUB2(LUJOIN,lujoin,INT,INTV)
110#define LUJOIN(A1,A2) CCALLSFSUB2(LUJOIN,lujoin,INT,INTV,A1,A2)
111
112PROTOCCALLSFSUB4(LUKFDI,lukfdi,INT,INT,PINT,PINT)
113#define LUKFDI(A1,A2,A3,A4) CCALLSFSUB4(LUKFDI,lukfdi,INT,INT,PINT,PINT,A1,A2,A3,A4)
114
115PROTOCCALLSFSUB1(LULIST,lulist,INT)
116#define LULIST(A1) CCALLSFSUB1(LULIST,lulist,INT,A1)
117
118PROTOCCALLSFSUB0(LULOGO,lulogo)
119#define LULOGO() CCALLSFSUB0(LULOGO,lulogo)
120
121PROTOCCALLSFSUB2(LUNAME,luname,INT,PBYTE)
122#define LUNAME(A1,A2) CCALLSFSUB2(LUNAME,luname,INT,PBYTE,A1,A2)
123
124PROTOCCALLSFSUB2(LUONIA,luonia,INT,FLOAT)
125#define LUONIA(A1,A2) CCALLSFSUB2(LUONIA,luonia,INT,FLOAT,A1,A2)
126
127PROTOCCALLSFSUB1(LUPREP,luprep,INT)
128#define LUPREP(A1) CCALLSFSUB1(LUPREP,luprep,INT,A1)
129
130PROTOCCALLSFSUB3(LUPTDI,luptdi,INT,PFLOAT,PFLOAT)
131#define LUPTDI(A1,A2,A3) CCALLSFSUB3(LUPTDI,luptdi,INT,PFLOAT,PFLOAT,A1,A2,A3)
132
133PROTOCCALLSFSUB6(LURADK,luradk,FLOAT,PINT,PFLOAT,PFLOAT,PFLOAT,PFLOAT)
134#define LURADK(A1,A2,A3,A4,A5,A6) CCALLSFSUB6(LURADK,luradk,FLOAT,PINT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6)
135
136PROTOCCALLSFSUB7(LUDBRB,ludbrb,INT,INT,FLOAT,FLOAT,DOUBLE,DOUBLE,DOUBLE)
137#define LUDBRB(A1,A2,A3,A4,A5,A6,A7) CCALLSFSUB7(LUDBRB,ludbrb,INT,INT,FLOAT,FLOAT,DOUBLE,DOUBLE,DOUBLE,A1,A2,A3,A4,A5,A6,A7)
138
139PROTOCCALLSFSUB5(LUROBO,lurobo,FLOAT,FLOAT,FLOAT,FLOAT,FLOAT)
140#define LUROBO(A1,A2,A3,A4,A5) CCALLSFSUB5(LUROBO,lurobo,FLOAT,FLOAT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
141
142PROTOCCALLSFSUB3(LUSHOW,lushow,INT,INT,FLOAT)
143#define LUSHOW(A1,A2,A3) CCALLSFSUB3(LUSHOW,lushow,INT,INT,FLOAT,A1,A2,A3)
144
145PROTOCCALLSFSUB2(LUSPHE,lusphe,PFLOAT,PFLOAT)
146#define LUSPHE(A1,A2) CCALLSFSUB2(LUSPHE,lusphe,PFLOAT,PFLOAT,A1,A2)
147
148PROTOCCALLSFSUB1(LUSTRF,lustrf,INT)
149#define LUSTRF(A1) CCALLSFSUB1(LUSTRF,lustrf,INT,A1)
150
151PROTOCCALLSFSUB1(LUTABU,lutabu,INT)
152#define LUTABU(A1) CCALLSFSUB1(LUTABU,lutabu,INT,A1)
153
154PROTOCCALLSFSUB4(LUTAUD,lutaud,INT,INT,INT,PINT)
155#define LUTAUD(A1,A2,A3,A4) CCALLSFSUB4(LUTAUD,lutaud,INT,INT,INT,PINT,A1,A2,A3,A4)
156
157PROTOCCALLSFSUB1(LUTEST,lutest,INT)
158#define LUTEST(A1) CCALLSFSUB1(LUTEST,lutest,INT,A1)
159
160PROTOCCALLSFSUB2(LUTHRU,luthru,PFLOAT,PFLOAT)
161#define LUTHRU(A1,A2) CCALLSFSUB2(LUTHRU,luthru,PFLOAT,PFLOAT,A1,A2)
162
163PROTOCCALLSFSUB2(LUUPDA,luupda,INT,INT)
164#define LUUPDA(A1,A2) CCALLSFSUB2(LUUPDA,luupda,INT,INT,A1,A2)
165
166PROTOCCALLSFSUB6(LUX3JT,lux3jt,PINT,FLOAT,INT,FLOAT,PFLOAT,PFLOAT)
167#define LUX3JT(A1,A2,A3,A4,A5,A6) CCALLSFSUB6(LUX3JT,lux3jt,PINT,FLOAT,INT,FLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6)
168
169PROTOCCALLSFSUB10(LUX4JT,lux4jt,PINT,FLOAT,INT,FLOAT,PINT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,PFLOAT)
170#define LUX4JT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10) CCALLSFSUB10(LUX4JT,lux4jt,PINT,FLOAT,INT,FLOAT,PINT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
171
172PROTOCCALLSFSUB7(LUXDIF,luxdif,INT,INT,INT,FLOAT,PFLOAT,PFLOAT,PFLOAT)
173#define LUXDIF(A1,A2,A3,A4,A5,A6,A7) CCALLSFSUB7(LUXDIF,luxdif,INT,INT,INT,FLOAT,PFLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6,A7)
174
175PROTOCCALLSFSUB3(LUXJET,luxjet,FLOAT,PINT,PFLOAT)
176#define LUXJET(A1,A2,A3) CCALLSFSUB3(LUXJET,luxjet,FLOAT,PINT,PFLOAT,A1,A2,A3)
177
178PROTOCCALLSFSUB4(LUXKFL,luxkfl,INT,FLOAT,FLOAT,PINT)
179#define LUXKFL(A1,A2,A3,A4) CCALLSFSUB4(LUXKFL,luxkfl,INT,FLOAT,FLOAT,PINT,A1,A2,A3,A4)
180
181PROTOCCALLSFSUB3(LUXTOT,luxtot,INT,FLOAT,PFLOAT)
182#define LUXTOT(A1,A2,A3) CCALLSFSUB3(LUXTOT,luxtot,INT,FLOAT,PFLOAT,A1,A2,A3)
183
184PROTOCCALLSFSUB4(LUZDIS,luzdis,INT,INT,FLOAT,PFLOAT)
185#define LUZDIS(A1,A2,A3,A4) CCALLSFSUB4(LUZDIS,luzdis,INT,INT,FLOAT,PFLOAT,A1,A2,A3,A4)
186
187PROTOCCALLSFSUB2(PDFSET,pdfset,PSTRINGV,PDOUBLE)
188#define PDFSET(A1,A2) CCALLSFSUB2(PDFSET,pdfset,PSTRINGV,PDOUBLE,A1,A2)
189
190PROTOCCALLSFSUB0(PYDIFF,pydiff)
191#define PYDIFF() CCALLSFSUB0(PYDIFF,pydiff)
192
193PROTOCCALLSFSUB0(PYDOCU,pydocu)
194#define PYDOCU() CCALLSFSUB0(PYDOCU,pydocu)
195
196PROTOCCALLSFSUB0(PYEVNT,pyevnt)
197#define PYEVNT() CCALLSFSUB0(PYEVNT,pyevnt)
198
199PROTOCCALLSFSUB1(PYEVWT,pyevwt,PFLOAT)
200#define PYEVWT(A1) CCALLSFSUB1(PYEVWT,pyevwt,PFLOAT,A1)
201
202PROTOCCALLSFSUB1(PYFRAM,pyfram,INT)
203#define PYFRAM(A1) CCALLSFSUB1(PYFRAM,pyfram,INT,A1)
204
205PROTOCCALLSFSUB4(PYI3AU,pyi3au,FLOAT,FLOAT,PFLOAT,PFLOAT)
206#define PYI3AU(A1,A2,A3,A4) CCALLSFSUB4(PYI3AU,pyi3au,FLOAT,FLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4)
207
208PROTOCCALLSFSUB4(PYINIT,pyinit,STRING,STRING,STRING,FLOAT)
209#define PYINIT(A1,A2,A3,A4) CCALLSFSUB4(PYINIT,pyinit,STRING,STRING,STRING,FLOAT,A1,A2,A3,A4)
210
211PROTOCCALLSFSUB1(PYINKI,pyinki,INT)
212#define PYINKI(A1) CCALLSFSUB1(PYINKI,pyinki,INT,A1)
213
214PROTOCCALLSFSUB0(PYINPR,pyinpr)
215#define PYINPR() CCALLSFSUB0(PYINPR,pyinpr)
216
217PROTOCCALLSFSUB0(PYINRE,pyinre)
218#define PYINRE() CCALLSFSUB0(PYINRE,pyinre)
219
220PROTOCCALLSFSUB1(PYKCUT,pykcut,PINT)
221#define PYKCUT(A1) CCALLSFSUB1(PYKCUT,pykcut,PINT,A1)
222
223PROTOCCALLSFSUB1(PYKLIM,pyklim,INT)
224#define PYKLIM(A1) CCALLSFSUB1(PYKLIM,pyklim,INT,A1)
225
226PROTOCCALLSFSUB3(PYKMAP,pykmap,INT,INT,FLOAT)
227#define PYKMAP(A1,A2,A3) CCALLSFSUB3(PYKMAP,pykmap,INT,INT,FLOAT,A1,A2,A3)
228
229PROTOCCALLSFSUB0(PYMAXI,pymaxi)
230#define PYMAXI() CCALLSFSUB0(PYMAXI,pymaxi)
231
232PROTOCCALLSFSUB1(PYMULT,pymult,INT)
233#define PYMULT(A1) CCALLSFSUB1(PYMULT,pymult,INT,A1)
234
235PROTOCCALLSFSUB7(PYOFSH,pyofsh,INT,INT,INT,INT,FLOAT,PFLOAT,PFLOAT)
236#define PYOFSH(A1,A2,A3,A4,A5,A6,A7) CCALLSFSUB7(PYOFSH,pyofsh,INT,INT,INT,INT,FLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6,A7)
237
238PROTOCCALLSFSUB1(PYPILE,pypile,INT)
239#define PYPILE(A1) CCALLSFSUB1(PYPILE,pypile,INT,A1)
240
241PROTOCCALLSFSUB1(PYQQBH,pyqqbh,PFLOAT)
242#define PYQQBH(A1) CCALLSFSUB1(PYQQBH,pyqqbh,PFLOAT,A1)
243
244PROTOCCALLSFSUB0(PYRAND,pyrand)
245#define PYRAND() CCALLSFSUB0(PYRAND,pyrand)
246
247PROTOCCALLSFSUB2(PYREMN,pyremn,INT,INT)
248#define PYREMN(A1,A2) CCALLSFSUB2(PYREMN,pyremn,INT,INT,A1,A2)
249
250PROTOCCALLSFSUB0(PYRESD,pyresd)
251#define PYRESD() CCALLSFSUB0(PYRESD,pyresd)
252
253PROTOCCALLSFSUB2(PYSAVE,pysave,INT,PINT)
254#define PYSAVE(A1,A2) CCALLSFSUB2(PYSAVE,pysave,INT,PINT,A1,A2)
255
256PROTOCCALLSFSUB0(PYSCAT,pyscat)
257#define PYSCAT() CCALLSFSUB0(PYSCAT,pyscat)
258
259PROTOCCALLSFSUB2(PYSIGH,pysigh,PINT,PFLOAT)
260#define PYSIGH(A1,A2) CCALLSFSUB2(PYSIGH,pysigh,PINT,PFLOAT,A1,A2)
261
262PROTOCCALLSFSUB4(PYSPLI,pyspli,INT,INT,PINT,PINT)
263#define PYSPLI(A1,A2,A3,A4) CCALLSFSUB4(PYSPLI,pyspli,INT,INT,PINT,PINT,A1,A2,A3,A4)
264
265PROTOCCALLSFSUB2(PYSSPA,pysspa,INT,INT)
266#define PYSSPA(A1,A2) CCALLSFSUB2(PYSSPA,pysspa,INT,INT,A1,A2)
267
268PROTOCCALLSFSUB3(PYSTAG,pystag,FLOAT,FLOAT,PFLOAT)
269#define PYSTAG(A1,A2,A3) CCALLSFSUB3(PYSTAG,pystag,FLOAT,FLOAT,PFLOAT,A1,A2,A3)
270
271PROTOCCALLSFSUB1(PYSTAT,pystat,INT)
272#define PYSTAT(A1) CCALLSFSUB1(PYSTAT,pystat,INT,A1)
273
274PROTOCCALLSFSUB3(PYSTEL,pystel,FLOAT,FLOAT,PFLOAT)
275#define PYSTEL(A1,A2,A3) CCALLSFSUB3(PYSTEL,pystel,FLOAT,FLOAT,PFLOAT,A1,A2,A3)
276
277PROTOCCALLSFSUB4(PYSTFL,pystfl,INT,FLOAT,FLOAT,PFLOAT)
278#define PYSTFL(A1,A2,A3,A4) CCALLSFSUB4(PYSTFL,pystfl,INT,FLOAT,FLOAT,PFLOAT,A1,A2,A3,A4)
279
280PROTOCCALLSFSUB4(PYSTFU,pystfu,INT,FLOAT,FLOAT,PFLOAT)
281#define PYSTFU(A1,A2,A3,A4) CCALLSFSUB4(PYSTFU,pystfu,INT,FLOAT,FLOAT,PFLOAT,A1,A2,A3,A4)
282
283PROTOCCALLSFSUB3(PYSTGA,pystga,FLOAT,FLOAT,PFLOAT)
284#define PYSTGA(A1,A2,A3) CCALLSFSUB3(PYSTGA,pystga,FLOAT,FLOAT,PFLOAT,A1,A2,A3)
285
286PROTOCCALLSFSUB6(PYSTGS,pystgs,DOUBLE,DOUBLE,DOUBLE,DOUBLE,INT,PDOUBLE)
287#define PYSTGS(A1,A2,A3,A4,A5,A6) CCALLSFSUB6(PYSTGS,pystgs,DOUBLE,DOUBLE,DOUBLE,DOUBLE,INT,PDOUBLE,A1,A2,A3,A4,A5,A6)
288
289PROTOCCALLSFSUB6(PYSTHG,pysthg,INT,FLOAT,FLOAT,FLOAT,FLOAT,PFLOAT)
290#define PYSTHG(A1,A2,A3,A4,A5,A6) CCALLSFSUB6(PYSTHG,pysthg,INT,FLOAT,FLOAT,FLOAT,FLOAT,PFLOAT,A1,A2,A3,A4,A5,A6)
291
292PROTOCCALLSFSUB3(PYSTPI,pystpi,FLOAT,FLOAT,PFLOAT)
293#define PYSTPI(A1,A2,A3) CCALLSFSUB3(PYSTPI,pystpi,FLOAT,FLOAT,PFLOAT,A1,A2,A3)
294
295PROTOCCALLSFSUB3(PYSTPR,pystpr,FLOAT,FLOAT,PFLOAT)
296#define PYSTPR(A1,A2,A3) CCALLSFSUB3(PYSTPR,pystpr,FLOAT,FLOAT,PFLOAT,A1,A2,A3)
297
298PROTOCCALLSFSUB1(PYTEST,pytest,INT)
299#define PYTEST(A1) CCALLSFSUB1(PYTEST,pytest,INT,A1)
300
301PROTOCCALLSFSUB2(PYUPEV,pyupev,INT,PFLOAT)
302#define PYUPEV(A1,A2) CCALLSFSUB2(PYUPEV,pyupev,INT,PFLOAT,A1,A2)
303
304PROTOCCALLSFSUB3(PYUPIN,pyupin,INT,STRING,FLOAT)
305#define PYUPIN(A1,A2,A3) CCALLSFSUB3(PYUPIN,pyupin,INT,STRING,FLOAT,A1,A2,A3)
306
307PROTOCCALLSFSUB4(PYWAUX,pywaux,INT,FLOAT,FLOAT,PFLOAT)
308#define PYWAUX(A1,A2,A3,A4) CCALLSFSUB4(PYWAUX,pywaux,INT,FLOAT,FLOAT,PFLOAT,A1,A2,A3,A4)
309
310PROTOCCALLSFSUB4(PYWIDT,pywidt,INT,FLOAT,PFLOAT,PFLOAT)
311#define PYWIDT(A1,A2,A3,A4) CCALLSFSUB4(PYWIDT,pywidt,INT,FLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4)
312
313PROTOCCALLSFSUB0(PYXTOT,pyxtot)
314#define PYXTOT() CCALLSFSUB0(PYXTOT,pyxtot)
315
316PROTOCCALLSFSUB8(RKBBV,rkbbv,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,INT,PFLOAT)
317#define RKBBV(A1,A2,A3,A4,A5,A6,A7,A8) CCALLSFSUB8(RKBBV,rkbbv,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,INT,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8)
318
319PROTOCCALLSFSUB6(RKHLPK,rkhlpk,INT,PINT,PINT,PINT,PINT,PINT)
320#define RKHLPK(A1,A2,A3,A4,A5,A6) CCALLSFSUB6(RKHLPK,rkhlpk,INT,PINT,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5,A6)
321
322PROTOCCALLSFSUB2(RLUGET,rluget,INT,INT)
323#define RLUGET(A1,A2) CCALLSFSUB2(RLUGET,rluget,INT,INT,A1,A2)
324
325PROTOCCALLSFSUB2(RLUSET,rluset,INT,INT)
326#define RLUSET(A1,A2) CCALLSFSUB2(RLUSET,rluset,INT,INT,A1,A2)
327
328PROTOCCALLSFSUB11(STRUCTM,structm,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,PDOUBLE)
329#define STRUCTM(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11) CCALLSFSUB11(STRUCTM,structm,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,DOUBLE,PDOUBLE,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
Note: See TracBrowser for help on using the repository browser.