Here are some things that might be useful.
- Adventures in Phase Space - a movie tutorial demonstrating how Wigner functions for states like coherent states, cat states and number states behave in phase space
- Mathematica 6 code for combining two plots with different y axes (right click and “save target/link as”)
- Optical Tweezers Toolbox 1.1