*
* Compress the sphere so it is like a ball with no air
*
pset / p_gt_zero / geom / xyz / 1 0 0 / 0.1 -10. -10 / 10. 10. 10.
scale / pset get p_gt_zero / relative / xyz / 0.6 1.0 1.0
*
* Now change the sign of the x coordinate
math / multiply / cmo_tri / xic / pset get p_gt_zero / cmo_tri / xic / -1.0
finish