2
* This header file declares stubs and show prototypes of the
5
* srftoc.h contains macros which define the names of c routines
6
* accessible from FORTRAN and vice versa
12
#include "msgtypesc.h"
16
#define DBL DoublePrecision
23
extern void BRDCST_(INT *type, char *buf, INT *lenbuf, INT *originator);
24
extern void DGOP_(INT *type, DBL *x, INT *n, char *op, int oplen);
25
/*extern DBL DRAND48_();*/
26
extern void IGOP_(INT *type, INT *x, INT *n, char *op, int oplen);
28
extern INT MDTOB_(INT *n);
29
extern INT MDTOI_(INT *n);
30
extern INT MITOB_(INT *n);
31
extern INT MITOD_(INT *n);
33
extern INT NICEFTN_(INT *ival);
36
extern INT NXTVAL_(INT *mproc);
37
extern void PARERR_(INT *code);
38
extern void PBEGINF_();
39
extern void PBGINF_();
41
extern void PFCOPY_(INT *type, INT *node0, char *fname, int len);
42
extern INT PROBE_(INT *type, INT *node);
43
extern void RCV_(INT *type, char *buf, INT *lenbuf, INT *lenmes, INT *nodeselect, INT * nodefrom, INT *sync);
44
extern void SETDBG_(INT *value);
45
extern void SND_(INT *type, char *buf, INT *lenbuf, INT *node, INT *sync);
46
/*extern void SRAND48_(INT *seed);*/
48
extern void SYNCH_(INT *type);
49
extern INT TCGREADY_();
50
extern DBL TCGTIME_();
51
extern void WAITCOM_(INT *node);
57
extern void Error(char *string, INT integer);
58
extern void tcgi_pbegin(int argc, char **argv);
59
extern void PrintProcInfo();
60
extern void RemoteConnect(INT a, INT b, INT c);
61
extern void MtimeReset();
62
extern void USleep(INT us);
67
#endif /* SNDRCV_H_ */