Add radius parameter to sphere
Comment negation of p.Z()