The Mathematica file used for the numericala analysis and the construction of the Figures may be downloaded from here