/******************************************************************************
* 			    PVM TEMPLATE CODES 
* FILE: hello.master.c
* OTHER FILES: hello.worker.c  make.hello.c
* DESCRIPTION: Trivial PVM example - master program.  C version
* PVM VERSION: 2.4
* AUTHOR: Blaise Barney
* LAST REVISED: 5/27/93 bbarney
******************************************************************************/

#include <stdio.h>

#define NUM_INSTANCES  	6
#define HELLO_MSGTYPE   1
 
main() {
int     i,
        msgtype,
	inst[NUM_INSTANCES];
char    helloworld[13] = "HELLO WORLD!";
 
printf("Enrolling master component in pvm...\n");
enroll("hello.master");
 
printf("Initiating worker component instances...\n");
for (i=0; i<NUM_INSTANCES; i++) {
  inst[i] = initiate("hello.worker","RIOS");
  printf("   initiated instance= %d\n", inst[i]);
  }
 
printf("Sending message to all worker instances...\n");
msgtype = HELLO_MSGTYPE;
initsend();
putstring(helloworld);
for (i=0; i<NUM_INSTANCES; i++) 
  snd("hello.worker", inst[i], msgtype); 

printf("All done. Leaving hello.master.\n");
leave();
}