25int readr(HANDLE pipe,
char *buf,
int nbytes);
26int writer(HANDLE pipe,
char*buf,
int nbytes);
28int readr(
int pipe,
char *buf,
int nbytes);
29int writer(
int pipe ,
char *buf,
int nbytes);
34extern void fatal(
char *msg);
35extern void catch_sig_c(
int *pid);
38void openfifo_c(
int *iroot,
int *len,
int *fdw,
int *fdr,
int *sd,
int *ispmd,
int *nthr,
int *ppid);
39void _FCALL OPENFIFO_C(
int *iroot,
int *len,
int *fdw,
int *fdr,
int *sd,
int *ispmd,
int *nthr,
int *ppid);
40void openfifo_c_(
int *iroot,
int *len,
int *fdw,
int *fdr,
int *sd,
int *ispmd,
int *nthr,
int *ppid);
41void openfifo_c__(
int *iroot,
int *len,
int *fdw,
int *fdr,
int *sd,
int *ispmd,
int *nthr,
int *ppid);
43void opensem_c(
int *iroot,
int *len,
int *ispmd,
int *nthr,
int *ppid);
44void _FCALL OPENSEM_C(
int *iroot,
int *len,
int *ispmd,
int *nthr,
int *ppid);
45void opensem_c_(
int *iroot,
int *len,
int *ispmd,
int *nthr,
int *ppid);
46void opensem_c__(
int *iroot,
int *len,
int *ispmd,
int *nthr,
int *ppid);
70void init_link_c(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
71 int *ixc,
int *ofc,
int *info,
int *typ,
int *cdt,
int *cdr,
int *print,
int *rddl,
72 int *nlink, my_real_c *dx);
73void _FCALL INIT_LINK_C (
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
74 int *ixc,
int *ofc,
int *info,
int *typ,
int *cdt,
int *cdr,
int *print,
int *rddl,
75 int *nlink, my_real_c *dx);
76void _FCALL init_link_c_(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
77 int *ixc,
int *ofc,
int *info,
int *typ,
int *cdt,
int *cdr,
int *print,
int *rddl,
78 int *nlink, my_real_c *dx);
79void _FCALL init_link_c__(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
80 int *ixc,
int *ofc,
int *info,
int *typ,
int *cdt,
int *cdr,
int *print,
int *rddl,
81 int *nlink, my_real_c *dx);
83void init_link_nl_c(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *print,
84 my_real_c *dx,
int *ndof_nl,
int *nb_tot_dof,
int *nlnk);
86 my_real_c *dx,
int *ndof_nl,
int *nb_tot_dof,
int *nlnk);
88 my_real_c *dx,
int *ndof_nl,
int *nb_tot_dof,
int *nlnk);
90 my_real_c *dx,
int *ndof_nl,
int *nb_tot_dof,
int *nlnk);
91void init_buf_spmd_c(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
int *ixc,
92 int *ofc,
int *tlel,
int *lel,
int *lelnb,
int *tleln,
int *leln,
int *nbelem,
int *tcnel,
93 int *cnelem2,
int *wgt,
int *tcneldb,
int *cnelemdb,
int *info,
int *typ,
int *nglob);
94void _FCALL INIT_BUF_SPMD_C(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
int *ixc,
95 int *ofc,
int *tlel,
int *lel,
int *lelnb,
int *tleln,
int *leln,
int *nbelem,
int *tcnel,
96 int *cnelem2,
int *wgt,
int *tcneldb,
int *cnelemdb,
int *info,
int *typ,
int *nglob);
97void _FCALL init_buf_spmd_c_(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
int *ixc,
98 int *ofc,
int *tlel,
int *lel,
int *lelnb,
int *tleln,
int *leln,
int *nbelem,
int *tcnel,
99 int *cnelem2,
int *wgt,
int *tcneldb,
int *cnelemdb,
int *info,
int *typ,
int *nglob);
100void _FCALL init_buf_spmd_c__(
int *igd,
int *nng,
int *itab,
int *nodbuf, my_real_c *
x,
int *addcnel,
int *cnel,
int *ixc,
101 int *ofc,
int *tlel,
int *lel,
int *lelnb,
int *tleln,
int *leln,
int *nbelem,
int *tcnel,
102 int *cnelem2,
int *wgt,
int *tcneldb,
int *cnelemdb,
int *info,
int *typ,
int *nglob);
104void init_link_spmd_c(
int *igd,
int *nng,
int *dbnod,
int *nbproc,
int *ibuf,
int *dbibuf,
105 int *dbnbuf,
int *ddbuf, my_real_c *rbuf,
int *dim,
int *ibufnb,
106 int *ibufcnel,
int *nbel,
int *dimel,
int *ibufel,
int *ibufelnbnod,
107 int *ibufelnod,
int *dimb,
int *ibufcneldb,
int *ibufnbeldb,
int *typ,
108 int *bcs,
int *print,
int *rddl,
int *
nl,
int *nlnk,
int *iex);
110 int *dbnbuf,
int *ddbuf, my_real_c *rbuf,
int *dim,
int *ibufnb,
111 int *ibufcnel,
int *nbel,
int *dimel,
int *ibufel,
int *ibufelnbnod,
112 int *ibufelnod,
int *dimb,
int *ibufcneldb,
int *ibufnbeldb,
int *typ,
113 int *bcs,
int *print,
int *rddl,
int *
nl,
int *nlnk,
int *iex);
115 int *dbnbuf,
int *ddbuf, my_real_c *rbuf,
int *dim,
int *ibufnb,
116 int *ibufcnel,
int *nbel,
int *dimel,
int *ibufel,
int *ibufelnbnod,
117 int *ibufelnod,
int *dimb,
int *ibufcneldb,
int *ibufnbeldb,
int *typ,
118 int *bcs,
int *print,
int *rddl,
int *
nl,
int *nlnk,
int *iex);
120 int *dbnbuf,
int *ddbuf, my_real_c *rbuf,
int *dim,
int *ibufnb,
121 int *ibufcnel,
int *nbel,
int *dimel,
int *ibufel,
int *ibufelnbnod,
122 int *ibufelnod,
int *dimb,
int *ibufcneldb,
int *ibufnbeldb,
int *typ,
123 int *bcs,
int *print,
int *rddl,
int *
nl,
int *nlnk,
int *iex);
156void send_mass_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
157void _FCALL SEND_MASS_C(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
158void send_mass_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
159void send_mass_c__(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
161void send_mass_nl_c(
int *idp,
int *nng,
int *iadd_nl, my_real_c *ms);
165void send_mass_rby_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *npby,
166 int *nrbody, my_real_c *rby,
int *tag,
int *add_rby,
int *nnpby,
int *nrby);
168 int *nrbody, my_real_c *rby,
int *tag,
int *add_rby,
int *nnpby,
int *nrby);
169void send_mass_rby_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *npby,
170 int *nrbody, my_real_c *rby,
int *tag,
int *add_rby,
int *nnpby,
int *nrby);
171void send_mass_rby_c__(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *npby,
172 int *nrbody, my_real_c *rby,
int *tag,
int *add_rby,
int *nnpby,
int *nrby);
185 my_real_c *buf4,my_real_c *buf5,
int *
iroddl);
187 my_real_c *buf4,my_real_c *buf5,
int *
iroddl);
189 my_real_c *buf4,my_real_c *buf5,
int *
iroddl);
191 my_real_c *buf4,my_real_c *buf5,
int *
iroddl);
193void get_mass_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
194void _FCALL GET_MASS_C(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
195void get_mass_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
196void get_mass_c__(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in);
198void get_mass_rby_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *
x,
int *npby,
199 int *nrbody, my_real_c *rby,
int *nnpby,
int *nrby);
200void _FCALL GET_MASS_RBY_C(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *
x,
int *npby,
201 int *nrbody, my_real_c *rby,
int *nnpby,
int *nrby);
202void get_mass_rby_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *
x,
int *npby,
203 int *nrbody, my_real_c *rby,
int *nnpby,
int *nrby);
204void get_mass_rby_c__(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *
x,
int *npby,
205 int *nrbody, my_real_c *rby,
int *nnpby,
int *nrby);
207void get_mass_spmd_c(
int *idp,
int *nng, my_real_c *buf1, my_real_c *buf2);
212void get_mass_rby_spmd_c(
int *idp,
int *nng,my_real_c *buf1,my_real_c *buf2,my_real_c *buf3,my_real_c *buf4);
214void get_mass_rby_spmd_c_(
int *idp,
int *nng,my_real_c *buf1,my_real_c *buf2,my_real_c *buf3,my_real_c *buf4);
215void get_mass_rby_spmd_c__(
int *idp,
int *nng,my_real_c *buf1,my_real_c *buf2,my_real_c *buf3,my_real_c *buf4);
223 my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str,
224 my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in,
225 double *dx, my_real_c *
x,
int *typ,
int *npas, my_real_c *rby,
226 int *tag_rby,
int *add_rby,
int *rbylnk,
int *kin,
double *dr,
227 my_real_c *dt2,
int *iex,
int *off_sph,
int *numsph_glo,
int *nrby);
229 my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str,
230 my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in,
231 double *dx, my_real_c *
x,
int *typ,
int *npas, my_real_c *rby,
232 int *tag_rby,
int *add_rby,
int *rbylnk,
int *kin,
double *dr,
233 my_real_c *dt2,
int *iex,
int *off_sph,
int *numsph_glo,
int *nrby);
235 my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str,
236 my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in,
237 double *dx, my_real_c *
x,
int *typ,
int *npas, my_real_c *rby,
238 int *tag_rby,
int *add_rby,
int *rbylnk,
int *kin,
double *dr,
239 my_real_c *dt2,
int *iex,
int *off_sph,
int *numsph_glo,
int *nrby);
241 my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str,
242 my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in,
243 double *dx, my_real_c *
x,
int *typ,
int *npas, my_real_c *rby,
244 int *tag_rby,
int *add_rby,
int *rbylnk,
int *kin,
double *dr,
245 my_real_c *dt2,
int *iex,
int *off_sph,
int *numsph_glo,
int *nrby);
247void send_data_nl_c(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms,
int *npas,
int *iex);
248void _FCALL SEND_DATA_NL_C(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms,
int *npas,
int *iex);
249void send_data_nl_c_(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms,
int *npas,
int *iex);
250void send_data_nl_c__(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms,
int *npas,
int *iex);
253 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
254 my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6,
255 double *bufr7, my_real_c *bufr8, my_real_c *bufr9,
256 my_real_c *buf_rby,
int *flg_rby,
int *typ,
int *npas,
int *iex);
258 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
259 my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6,
260 double *bufr7, my_real_c *bufr8, my_real_c *bufr9,
261 my_real_c *buf_rby,
int *flg_rby,
int *typ,
int *npas,
int *iex);
263 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
264 my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6,
265 double *bufr7, my_real_c *bufr8, my_real_c *bufr9,
266 my_real_c *buf_rby,
int *flg_rby,
int *typ,
int *npas,
int *iex);
268 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
269 my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6,
270 double *bufr7, my_real_c *bufr8, my_real_c *bufr9,
271 my_real_c *buf_rby,
int *flg_rby,
int *typ,
int *npas,
int *iex);
274 my_real_c *ms, my_real_c *ir,
275 my_real_c *stx, my_real_c *str,
276 int *typ,
int *npas,
int *iex);
278 my_real_c *ms, my_real_c *ir,
279 my_real_c *stx, my_real_c *str,
280 int *typ,
int *npas,
int *iex);
282 my_real_c *ms, my_real_c *ir,
283 my_real_c *stx, my_real_c *str,
284 int *typ,
int *npas,
int *iex);
286 my_real_c *ms, my_real_c *ir,
287 my_real_c *stx, my_real_c *str,
288 int *typ,
int *npas,
int *iex);
291 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4,
292 int *typ,
int *npas,
int *iex,
int *nglob);
294 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4,
295 int *typ,
int *npas,
int *iex,
int *nglob);
297 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4,
298 int *typ,
int *npas,
int *iex,
int *nglob);
300 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4,
301 int *typ,
int *npas,
int *iex,
int *nglob);
303void get_force_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *wf,
304 my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v,
305 my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms,
306 my_real_c *in, my_real_c *
x,
double *xdp, my_real_c *dx,
307 int *typ,
int *kin,
int *wgt,
int *iex,
int *iresp,
double *tfext);
310 my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v,
311 my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms,
312 my_real_c *in, my_real_c *
x,
double *xdp, my_real_c *dx,
313 int *typ,
int *kin,
int *wgt,
int *iex,
int *iresp,
double *tfext);
314void get_force_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *wf,
315 my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v,
316 my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms,
317 my_real_c *in, my_real_c *
x,
double *xdp, my_real_c *dx,
318 int *typ,
int *kin,
int *wgt,
int *iex,
int *iresp,
double *tfext);
319void get_force_c__(
int *idp,
int *nng,
int *nodbuf, my_real_c *wf,
320 my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v,
321 my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms,
322 my_real_c *in, my_real_c *
x,
double *xdp, my_real_c *dx,
323 int *typ,
int *kin,
int *wgt,
int *iex,
int *iresp,
double *tfext);
325void get_force_nl_c(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *ms,
int *iex);
326void _FCALL GET_FORCE_NL_C(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *ms,
int *iex);
327void get_force_nl_c_(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *ms,
int *iex);
328void get_force_nl_c__(
int *idp,
int *nng,
int *iadd_nl, my_real_c *fx, my_real_c *ms,
int *iex);
331 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
332 my_real_c *bufr4,
int *typ,
int *iex,
int *nglob);
334 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
335 my_real_c *bufr4,
int *typ,
int *iex,
int *nglob);
337 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
338 my_real_c *bufr4,
int *typ,
int *iex,
int *nglob);
340 my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3,
341 my_real_c *bufr4,
int *typ,
int *iex,
int *nglob);
348void send_mass_kine_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *iex,
int *offset);
349void _FCALL SEND_MASS_KINE_C(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *iex,
int *offset);
350void send_mass_kine_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *iex,
int *offset);
351void send_mass_kine_c__(
int *idp,
int *nng,
int *nodbuf, my_real_c *ms, my_real_c *in,
int *iex,
int *offset);
353void get_displ_c(
int *idp,
int *nng,
int *nodbuf, my_real_c *
x);
355void get_displ_c_(
int *idp,
int *nng,
int *nodbuf, my_real_c *
x);
374void send_sock_init_c(
int *iroot,
int *len,
int *ispmd,
int *sd,
int *maxproc,
int *imach);
376void send_sock_init_c_(
int *iroot,
int *len,
int *ispmd,
int *sd,
int *maxproc,
int *imach);
377void send_sock_init_c__(
int *iroot,
int *len,
int *ispmd,
int *sd,
int *maxproc,
int *imach);
435 int *itag,
int *itag2,
int *iex,
int *offset,
438 int *itag,
int *itag2,
int *iex,
int *offset,
441 int *itag,
int *itag2,
int *iex,
int *offset,
444 int *itag,
int *itag2,
int *iex,
int *offset,
void send_sock_mess_c(int *sd, char *mess, int *len)
void init_link_c(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *info, int *typ, int *cdt, int *cdr, int *print, int *rddl, int *nlink, my_real_c *dx)
void send_mass_kine_c(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *iex, int *offset)
void _FCALL CONNECTION_SOCK_INIT_C(int *sd)
void opensem_c(int *iroot, int *len, int *ispmd, int *nthr, int *ppid)
void get_displ_c_(int *idp, int *nng, int *nodbuf, my_real_c *x)
void get_name_c__(char *name)
void send_sock_ibuf_c__(int *sd, int *ibuf, int *len)
void connection_sock_init_c(int *sd)
void r2r_unlock_threads__(int *nthr)
void send_mass_rby_spmd_c__(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *buf3, my_real_c *buf4, my_real_c *buf5, int *iroddl)
void send_sock_rbuf_c__(int *sd, my_real_c *rbuf, int *len)
void get_force_c(int *idp, int *nng, int *nodbuf, my_real_c *wf, my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v, my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms, my_real_c *in, my_real_c *x, double *xdp, my_real_c *dx, int *typ, int *kin, int *wgt, int *iex, int *iresp, double *tfext)
void send_mass_nl_c__(int *idp, int *nng, int *iadd_nl, my_real_c *ms)
void exch_itag_c__(int *idp, int *nng, int *nodbuf, int *itag, int *itag2, int *iex, int *offset, int *flag)
void get_sock_rbuf_c(int *sd, my_real_c *rbuf, int *len)
void send_mass_rby_c__(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *npby, int *nrbody, my_real_c *rby, int *tag, int *add_rby, int *nnpby, int *nrby)
void _FCALL init_buf_spmd_c__(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *tlel, int *lel, int *lelnb, int *tleln, int *leln, int *nbelem, int *tcnel, int *cnelem2, int *wgt, int *tcneldb, int *cnelemdb, int *info, int *typ, int *nglob)
void get_fbuf_c__(my_real_c *fbuf, int *len)
void get_shmbuf_c(int *val1, int *val2)
void get_shmbuf_c_(int *val1, int *val2)
void get_ibuf_c_(int *ibuf, int *len)
void send_fbuf_c__(my_real_c *fbuf, int *len)
void close_sock_c_(int *sd)
void mess_sock_c(int *sd)
void send_mass_c__(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void _FCALL SEND_IBUF_C(int *ibuf, int *len)
void send_sock_c__(int *sd)
void _FCALL MESS_SOCK_C(int *sd)
void get_name_c(char *name)
void get_fbuf_c(my_real_c *fbuf, int *len)
void _FCALL GET_STIFF_C(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *ir, my_real_c *stx, my_real_c *str, int *typ, int *npas, int *iex)
void send_shmbuf_c_(int *val1, int *val2)
void _FCALL GET_NAME_C(char *name)
void init_link_nl_c(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *print, my_real_c *dx, int *ndof_nl, int *nb_tot_dof, int *nlnk)
void _FCALL GET_MASS_RBY_C(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *x, int *npby, int *nrbody, my_real_c *rby, int *nnpby, int *nrby)
void mess_sock_c_(int *sd)
void get_stiff_c_(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *ir, my_real_c *stx, my_real_c *str, int *typ, int *npas, int *iex)
void _FCALL send_ibuf_c_(int *ibuf, int *len)
void opensem_c__(int *iroot, int *len, int *ispmd, int *nthr, int *ppid)
void get_mass_rby_c(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *x, int *npby, int *nrbody, my_real_c *rby, int *nnpby, int *nrby)
void get_mass_c(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void r2r_unlock_threads_c(int *nthr)
void exch_tagel_c_(int *ntagel, int *tagel, int *flag)
void do_activ_c_(int *iflg)
void _FCALL SEND_DATA_NL_C(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms, int *npas, int *iex)
void _FCALL SEND_SOCK_IBUF_C(int *sd, int *ibuf, int *len)
void get_displ_c(int *idp, int *nng, int *nodbuf, my_real_c *x)
void get_ibuf_c__(int *ibuf, int *len)
void _FCALL GET_FBUF_C(my_real_c *fbuf, int *len)
void close_r2r_pipe_c__()
void send_data_c_(int *idp, int *nng, int *nodbuf, my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str, my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in, double *dx, my_real_c *x, int *typ, int *npas, my_real_c *rby, int *tag_rby, int *add_rby, int *rbylnk, int *kin, double *dr, my_real_c *dt2, int *iex, int *off_sph, int *numsph_glo, int *nrby)
void _FCALL DO_ACTIV_C(int *iflg)
void check_dtnoda_c_(int *i7kglo)
void _FCALL GET_SOCK_IBUF_C(int *sd, int *ibuf, int *len)
void _FCALL init_link_c__(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *info, int *typ, int *cdt, int *cdr, int *print, int *rddl, int *nlink, my_real_c *dx)
void send_mass_spmd_c(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *iroddl)
void get_sock_ibuf_c(int *sd, int *ibuf, int *len)
void do_activ_c__(int *iflg)
void _FCALL OPENFIFO_C(int *iroot, int *len, int *fdw, int *fdr, int *sd, int *ispmd, int *nthr, int *ppid)
void get_force_spmd_c__(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *iex, int *nglob)
void get_displ_c__(int *idp, int *nng, int *nodbuf, my_real_c *x)
void _FCALL INIT_LINK_SPMD_C(int *igd, int *nng, int *dbnod, int *nbproc, int *ibuf, int *dbibuf, int *dbnbuf, int *ddbuf, my_real_c *rbuf, int *dim, int *ibufnb, int *ibufcnel, int *nbel, int *dimel, int *ibufel, int *ibufelnbnod, int *ibufelnod, int *dimb, int *ibufcneldb, int *ibufnbeldb, int *typ, int *bcs, int *print, int *rddl, int *nl, int *nlnk, int *iex)
void _FCALL CLOSE_SOCK_C(int *sd)
void send_sock_rbuf_c_(int *sd, my_real_c *rbuf, int *len)
void get_force_nl_c__(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *ms, int *iex)
static void do_activ_c(int *iflg)
void realloc_shmvs_c(int newsize)
void send_mass_rby_spmd_c_(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *buf3, my_real_c *buf4, my_real_c *buf5, int *iroddl)
void get_displ_spmd_c__(int *idp, int *nng, my_real_c *bufr)
void get_fbufdp_c_(double *fbuf, int *len)
void send_mass_rby_c_(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *npby, int *nrbody, my_real_c *rby, int *tag, int *add_rby, int *nnpby, int *nrby)
void _FCALL init_link_c_(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *info, int *typ, int *cdt, int *cdr, int *print, int *rddl, int *nlink, my_real_c *dx)
void send_sock_ibuf_c_(int *sd, int *ibuf, int *len)
void get_displ_spmd_c_(int *idp, int *nng, my_real_c *bufr)
void _FCALL SEND_MASS_KINE_C(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *iex, int *offset)
void mess_sock_c__(int *sd)
void exch_itag_c(int *idp, int *nng, int *nodbuf, int *itag, int *itag2, int *iex, int *offset, int *flag)
void r2r_unlock_threads_c_(int *nthr)
void _FCALL GET_DISPL_C(int *idp, int *nng, int *nodbuf, my_real_c *x)
void get_sock_rbuf_c__(int *sd, my_real_c *rbuf, int *len)
void connection_sock_c_(int *ispmd, int *sd, char *addr)
void get_mass_rby_spmd_c(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, my_real_c *buf3, my_real_c *buf4)
void _FCALL init_buf_spmd_c_(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *tlel, int *lel, int *lelnb, int *tleln, int *leln, int *nbelem, int *tcnel, int *cnelem2, int *wgt, int *tcneldb, int *cnelemdb, int *info, int *typ, int *nglob)
void get_force_c__(int *idp, int *nng, int *nodbuf, my_real_c *wf, my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v, my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms, my_real_c *in, my_real_c *x, double *xdp, my_real_c *dx, int *typ, int *kin, int *wgt, int *iex, int *iresp, double *tfext)
void send_mass_spmd_c_(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *iroddl)
void openfifo_c_(int *iroot, int *len, int *fdw, int *fdr, int *sd, int *ispmd, int *nthr, int *ppid)
void get_mass_c__(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void check_dtnoda_c(int *i7kglo)
void _FCALL GET_MASS_SPMD_C(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2)
void close_sock_c__(int *sd)
void _FCALL SEND_FBUFDP_C(double *fbuf, int *len)
void _FCALL INIT_ACTIV_C(int *activ)
void get_mass_rby_spmd_c_(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, my_real_c *buf3, my_real_c *buf4)
void _FCALL SEND_MASS_NL_C(int *idp, int *nng, int *iadd_nl, my_real_c *ms)
void _FCALL SEND_FBUF_C(my_real_c *fbuf, int *len)
void get_stiff_c(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *ir, my_real_c *stx, my_real_c *str, int *typ, int *npas, int *iex)
void init_link_spmd_c(int *igd, int *nng, int *dbnod, int *nbproc, int *ibuf, int *dbibuf, int *dbnbuf, int *ddbuf, my_real_c *rbuf, int *dim, int *ibufnb, int *ibufcnel, int *nbel, int *dimel, int *ibufel, int *ibufelnbnod, int *ibufelnod, int *dimb, int *ibufcneldb, int *ibufnbeldb, int *typ, int *bcs, int *print, int *rddl, int *nl, int *nlnk, int *iex)
void get_sock_ibuf_c_(int *sd, int *ibuf, int *len)
void connection_sock_init_c_(int *sd)
void send_sock_ibuf_c(int *sd, int *ibuf, int *len)
void openfifo_c__(int *iroot, int *len, int *fdw, int *fdr, int *sd, int *ispmd, int *nthr, int *ppid)
void send_fbufdp_c_(double *fbuf, int *len)
void send_mass_spmd_c__(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *iroddl)
void _FCALL GET_MASS_C(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void send_sock_c_(int *sd)
void _FCALL INIT_LINK_C(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *info, int *typ, int *cdt, int *cdr, int *print, int *rddl, int *nlink, my_real_c *dx)
void get_fbuf_c_(my_real_c *fbuf, int *len)
void _FCALL SEND_MASS_RBY_C(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *npby, int *nrbody, my_real_c *rby, int *tag, int *add_rby, int *nnpby, int *nrby)
void get_displ_spmd_c(int *idp, int *nng, my_real_c *bufr)
void get_sock_mess_c__(int *sd, char *mess, int *len)
void send_data_c(int *idp, int *nng, int *nodbuf, my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str, my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in, double *dx, my_real_c *x, int *typ, int *npas, my_real_c *rby, int *tag_rby, int *add_rby, int *rbylnk, int *kin, double *dr, my_real_c *dt2, int *iex, int *off_sph, int *numsph_glo, int *nrby)
void send_mass_kine_c_(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *iex, int *offset)
void _FCALL GET_MASS_RBY_SPMD_C(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, my_real_c *buf3, my_real_c *buf4)
void get_stiff_spmd_c_(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *npas, int *iex, int *nglob)
void _FCALL GET_STIFF_SPMD_C(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *npas, int *iex, int *nglob)
void send_mass_kine_c__(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *iex, int *offset)
void get_stiff_spmd_c__(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *npas, int *iex, int *nglob)
void send_sock_mess_c__(int *sd, char *mess, int *len)
void _FCALL GET_FBUFDP_C(double *fbuf, int *len)
void send_mass_rby_spmd_c(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *buf3, my_real_c *buf4, my_real_c *buf5, int *iroddl)
void _FCALL init_link_nl_c_(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *print, my_real_c *dx, int *ndof_nl, int *nb_tot_dof, int *nlnk)
void connection_sock_c__(int *ispmd, int *sd, char *addr)
void _FCALL R2R_BLOCK_C()
void get_force_spmd_c(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *iex, int *nglob)
void _FCALL INIT_LINK_NL_C(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *print, my_real_c *dx, int *ndof_nl, int *nb_tot_dof, int *nlnk)
int writer(int pipe, char *buf, int nbytes)
void _FCALL CLOSE_R2R_PIPE_C()
void get_force_spmd_c_(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *iex, int *nglob)
void _FCALL SEND_SHMBUF_C(int *val1, int *val2)
void _FCALL OPENSEM_C(int *iroot, int *len, int *ispmd, int *nthr, int *ppid)
void init_buf_spmd_c(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *tlel, int *lel, int *lelnb, int *tleln, int *leln, int *nbelem, int *tcnel, int *cnelem2, int *wgt, int *tcneldb, int *cnelemdb, int *info, int *typ, int *nglob)
void send_sock_init_c__(int *iroot, int *len, int *ispmd, int *sd, int *maxproc, int *imach)
void get_fbufdp_c(double *fbuf, int *len)
void send_sock_rbuf_c(int *sd, my_real_c *rbuf, int *len)
void init_activ_c(int *activ)
void send_sock_c(int *sd)
void send_data_nl_c_(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms, int *npas, int *iex)
void send_fbuf_c_(my_real_c *fbuf, int *len)
void send_fbuf_c(my_real_c *fbuf, int *len)
void get_mass_spmd_c_(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2)
void close_sock_c(int *sd)
void _FCALL send_ibuf_c__(int *ibuf, int *len)
void _FCALL SEND_DATA_C(int *idp, int *nng, int *nodbuf, my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str, my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in, double *dx, my_real_c *x, int *typ, int *npas, my_real_c *rby, int *tag_rby, int *add_rby, int *rbylnk, int *kin, double *dr, my_real_c *dt2, int *iex, int *off_sph, int *numsph_glo, int *nrby)
void connection_sock_init_c__(int *sd)
void get_sock_mess_c(int *sd, char *mess, int *len)
void _FCALL GET_DISPL_SPMD_C(int *idp, int *nng, my_real_c *bufr)
void get_fbufdp_c__(double *fbuf, int *len)
void _FCALL SEND_MASS_SPMD_C(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *iroddl)
void _FCALL GET_IBUF_C(int *ibuf, int *len)
void send_data_spmd_c__(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6, double *bufr7, my_real_c *bufr8, my_real_c *bufr9, my_real_c *buf_rby, int *flg_rby, int *typ, int *npas, int *iex)
void _FCALL SEND_SOCK_RBUF_C(int *sd, my_real_c *rbuf, int *len)
void send_data_nl_c(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms, int *npas, int *iex)
void send_fbufdp_c__(double *fbuf, int *len)
void send_mass_nl_c_(int *idp, int *nng, int *iadd_nl, my_real_c *ms)
void _FCALL CONNECTION_SOCK_C(int *ispmd, int *sd, char *addr)
void _FCALL SEND_DATA_SPMD_C(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6, double *bufr7, my_real_c *bufr8, my_real_c *bufr9, my_real_c *buf_rby, int *flg_rby, int *typ, int *npas, int *iex)
void get_force_nl_c(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *ms, int *iex)
void _FCALL GET_FORCE_C(int *idp, int *nng, int *nodbuf, my_real_c *wf, my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v, my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms, my_real_c *in, my_real_c *x, double *xdp, my_real_c *dx, int *typ, int *kin, int *wgt, int *iex, int *iresp, double *tfext)
void exch_itag_c_(int *idp, int *nng, int *nodbuf, int *itag, int *itag2, int *iex, int *offset, int *flag)
void get_mass_spmd_c__(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2)
void _FCALL EXCH_ITAG_C(int *idp, int *nng, int *nodbuf, int *itag, int *itag2, int *iex, int *offset, int *flag)
void get_stiff_c__(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *ir, my_real_c *stx, my_real_c *str, int *typ, int *npas, int *iex)
void send_mass_c_(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void _FCALL init_link_spmd_c_(int *igd, int *nng, int *dbnod, int *nbproc, int *ibuf, int *dbibuf, int *dbnbuf, int *ddbuf, my_real_c *rbuf, int *dim, int *ibufnb, int *ibufcnel, int *nbel, int *dimel, int *ibufel, int *ibufelnbnod, int *ibufelnod, int *dimb, int *ibufcneldb, int *ibufnbeldb, int *typ, int *bcs, int *print, int *rddl, int *nl, int *nlnk, int *iex)
static void close_r2r_pipe_c()
void get_shmbuf_c__(int *val1, int *val2)
void exch_tagel_c(int *ntagel, int *tagel, int *flag)
void send_shmbuf_c__(int *val1, int *val2)
void get_mass_spmd_c(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2)
void send_sock_init_c(int *iroot, int *len, int *ispmd, int *sd, int *maxproc, int *imach)
void get_sock_mess_c_(int *sd, char *mess, int *len)
void get_stiff_spmd_c(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *npas, int *iex, int *nglob)
void send_ibuf_c(int *ibuf, int *len)
void get_sock_ibuf_c__(int *sd, int *ibuf, int *len)
void _FCALL SEND_MASS_C(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void _FCALL SEND_SOCK_MESS_C(int *sd, char *mess, int *len)
void send_data_spmd_c(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6, double *bufr7, my_real_c *bufr8, my_real_c *bufr9, my_real_c *buf_rby, int *flg_rby, int *typ, int *npas, int *iex)
void send_shmbuf_c(int *val1, int *val2)
void send_sock_mess_c_(int *sd, char *mess, int *len)
void _FCALL GET_FORCE_NL_C(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *ms, int *iex)
void get_sock_rbuf_c_(int *sd, my_real_c *rbuf, int *len)
void _FCALL GET_SOCK_MESS_C(int *sd, char *mess, int *len)
void send_data_spmd_c_(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, my_real_c *bufr5, my_real_c *bufr6, double *bufr7, my_real_c *bufr8, my_real_c *bufr9, my_real_c *buf_rby, int *flg_rby, int *typ, int *npas, int *iex)
void init_activ_c__(int *activ)
void realloc_shmvr_c(int newsize)
void _FCALL SEND_SOCK_C(int *sd)
void get_mass_rby_spmd_c__(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, my_real_c *buf3, my_real_c *buf4)
void _FCALL GET_SOCK_RBUF_C(int *sd, my_real_c *rbuf, int *len)
void _FCALL init_link_nl_c__(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *print, my_real_c *dx, int *ndof_nl, int *nb_tot_dof, int *nlnk)
void opensem_c_(int *iroot, int *len, int *ispmd, int *nthr, int *ppid)
void send_data_c__(int *idp, int *nng, int *nodbuf, my_real_c *fx, my_real_c *fr, my_real_c *stx, my_real_c *str, my_real_c *vx, my_real_c *vr, my_real_c *ms, my_real_c *in, double *dx, my_real_c *x, int *typ, int *npas, my_real_c *rby, int *tag_rby, int *add_rby, int *rbylnk, int *kin, double *dr, my_real_c *dt2, int *iex, int *off_sph, int *numsph_glo, int *nrby)
void get_ibuf_c(int *ibuf, int *len)
void _FCALL CHECK_DTNODA_C(int *i7kglo)
void _FCALL SEND_MASS_RBY_SPMD_C(int *idp, int *nng, my_real_c *buf1, my_real_c *buf2, int *buf3, my_real_c *buf4, my_real_c *buf5, int *iroddl)
void send_data_nl_c__(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *vx, my_real_c *ms, int *npas, int *iex)
void send_mass_rby_c(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, int *npby, int *nrbody, my_real_c *rby, int *tag, int *add_rby, int *nnpby, int *nrby)
void get_mass_rby_c__(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *x, int *npby, int *nrbody, my_real_c *rby, int *nnpby, int *nrby)
void _FCALL GET_SHMBUF_C(int *val1, int *val2)
void _FCALL INIT_BUF_SPMD_C(int *igd, int *nng, int *itab, int *nodbuf, my_real_c *x, int *addcnel, int *cnel, int *ixc, int *ofc, int *tlel, int *lel, int *lelnb, int *tleln, int *leln, int *nbelem, int *tcnel, int *cnelem2, int *wgt, int *tcneldb, int *cnelemdb, int *info, int *typ, int *nglob)
void send_fbufdp_c(double *fbuf, int *len)
void _FCALL GET_FORCE_SPMD_C(int *idp, int *nng, my_real_c *bufr1, my_real_c *bufr2, my_real_c *bufr3, my_real_c *bufr4, int *typ, int *iex, int *nglob)
void check_dtnoda_c__(int *i7kglo)
void get_force_nl_c_(int *idp, int *nng, int *iadd_nl, my_real_c *fx, my_real_c *ms, int *iex)
void exch_tagel_c__(int *ntagel, int *tagel, int *flag)
void _FCALL R2R_UNLOCK_THREADS_C(int *nthr)
void _FCALL init_link_spmd_c__(int *igd, int *nng, int *dbnod, int *nbproc, int *ibuf, int *dbibuf, int *dbnbuf, int *ddbuf, my_real_c *rbuf, int *dim, int *ibufnb, int *ibufcnel, int *nbel, int *dimel, int *ibufel, int *ibufelnbnod, int *ibufelnod, int *dimb, int *ibufcneldb, int *ibufnbeldb, int *typ, int *bcs, int *print, int *rddl, int *nl, int *nlnk, int *iex)
void send_mass_nl_c(int *idp, int *nng, int *iadd_nl, my_real_c *ms)
void init_activ_c_(int *activ)
int readr(int pipe, char *buf, int nbytes)
void send_sock_init_c_(int *iroot, int *len, int *ispmd, int *sd, int *maxproc, int *imach)
void _FCALL SEND_SOCK_INIT_C(int *iroot, int *len, int *ispmd, int *sd, int *maxproc, int *imach)
void connection_sock_c(int *ispmd, int *sd, char *addr)
void get_mass_c_(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void get_name_c_(char *name)
void send_mass_c(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in)
void get_mass_rby_c_(int *idp, int *nng, int *nodbuf, my_real_c *ms, my_real_c *in, my_real_c *x, int *npby, int *nrbody, my_real_c *rby, int *nnpby, int *nrby)
void get_force_c_(int *idp, int *nng, int *nodbuf, my_real_c *wf, my_real_c *wm, my_real_c *wf2, my_real_c *wm2, my_real_c *v, my_real_c *vr, my_real_c *fx, my_real_c *fr, my_real_c *ms, my_real_c *in, my_real_c *x, double *xdp, my_real_c *dx, int *typ, int *kin, int *wgt, int *iex, int *iresp, double *tfext)
void _FCALL EXCH_TAGEL_C(int *ntagel, int *tagel, int *flag)
void openfifo_c(int *iroot, int *len, int *fdw, int *fdr, int *sd, int *ispmd, int *nthr, int *ppid)
*fortran !University of Stuttgart All rights reserved Inc All rights reserved ! $COPYRIGHT$ !Additional copyrights may follow ! $HEADER$ !WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING !Do ***not ***copy this file to the directory where your Fortran !fortran application is compiled unless it is absolutely necessary !Most !modern Fortran compilers now support the I command line flag
character *2 function nl()
void syserr_fatal(char *msg)