call MPI_RECV(square,1,MPI_REAL,1,99,MPI_COMM_WORLD,status,ierr)
		|    |    |     |  |        |         |      |
	    receive  |  type    | tag  communicator   |      |
             buffer  |   of    rank                   |    error
                     |  entry   of                    |
		     |        source               return  
                   maximum                         status
                   number                           array
                     of
		   entries
		 to receive