InversePlot Package

InversePlot[f, {x, xmin, xmax}] takes the expression f of x and plots it in red for the x values between xmin and xmax, and then reflects the graph across the line y=x. If this 'potential inverse' (shown in blue) is not the graph of a function, then f does not have a unique nverse on the interval from xmin to xmax.