/* Prototypes for pvm library calls */
/* PVM Version 2.4 */

#ifdef PROTO
int barrier(char *barrier_name, int num);
int enroll(char *component_name);
int getbytes(char *ptr, int num);
int getncplx(float *ptr, int num);
int getndcplx(double *ptr, int num);
int getndfloat(double *ptr, int num);
int getnfloat(float *ptr, int num);
int getnint(int *ptr, int num);
int getstring(char *ptr);
int initiate(char *object_file, char *arch);
void initsend();
void leave();
int probe(int msgtype);
int probemulti(int num, int *msgtypes);
int pstatus(int *ncpu, int *nformat);
int putbytes(char *ptr, int num);
int putncplx(float *ptr, int num);
int putnfloat(float *ptr, int num);
int putndcplx(double *ptr, int num);
int putndfloat(double *ptr, int num);
int putnint(int *ptr, int num);
int putstring(char *ptr);
int rcv(int msgtype);
int rcvinfo(int *bytes, int *msgtype, char *component, int *instance);
int snd(char *component, int instance, int msgtype);
int whoami(char *component, int *instance);

#else	/* sun 4 compiler doesn't speak ANSI */
int barrier();
int enroll();
int getbytes();
int getncplx();
int getndcplx();
int getndfloat();
int getnfloat();
int getnint();
int getstring();
int initiate();
void initsend();
void leave();
int probe();
int probemulti();
int pstatus();
int putbytes();
int putncplx();
int putnfloat();
int putndcplx();
int putndfloat();
int putnint();
int putstring();
int rcv();
int rcvinfo();
int snd();
int whoami();

#endif /* end if defined PROTO */