According to Christof Melcher, this produces a field of topological
charge q=1  (or -1, not sure).

[[Imported from SVN: r10006]]