module examples.cell;

behavior MovingCellTester{

    void act(String args[]){

	if (args.length != 3) {
	    standardOutput<-println( "Usage: salsa examples.cell.MovingCellTester <UAN> <UAL1> <UAL2>" );
	    return;
	}

	Cell c = new Cell("Hello") 
	    at (new UAN(args[0]),new UAL(args[1]));
	standardOutput<-print("Initial Value:") @
	    c<-get() @
	    standardOutput<-println(token) @
 	    c<-set("World") @
 	    standardOutput<-print("New Value:") @
 	    c<-get() @
 	    standardOutput<-println(token) @
 	    c<-migrate(args[2]) @
 	    c<-set("New World") @
 	    standardOutput<-print("New Value at New Location:") @
 	    c<-get() @
	    standardOutput<-println(token);
    }

}