]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...
]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...