module multicast;

behavior GlobalKnowledgeMulticast{
    
    AwareActor[] actors;
    long initialTime;

    long ack(){
	return System.currentTimeMillis() - initialTime;
    }

    void act(String args[]){
	int howMany = Integer.parseInt(args[0]);
	AwareActor[] actors = new AwareActor[howMany];
	for (int i = 0; i< howMany; i++){
	    actors[i] = new AwareActor();
	}
	initialTime = System.currentTimeMillis();
        standardOutput<-print("Time for global knowledge multicast: ") @
        join (actors<-m()) @ join (actors<-ok()) @ ack() @
	standardOutput<-print @
	standardOutput<-println(" ms.");
    }
}