twochargepotential.m