Antenna Array Synthesis with Mutual Coupling Effects

I need a Matlab Program which takes input from user to make any size of single or 2D Phased Dipole Antenna Array. Then, it should compute the impedance (Real & Imaginary Parts) of all the Dipole elements of array and alos the size of each dipole element in the array. Then, it should devise an algorithm to reduce the value of imaginary part of impedance to zero and also calculate the new lengths of dipole elements with zero imaginary values of impedacne.