daily pastebin goal
69%
SHARE
TWEET

Untitled

a guest May 16th, 2018 97 Never
Upgrade to PRO!
ENDING IN00days00hours00mins00secs
 
  1. H = {{I*(x + I*y), 1}, {1, -I*(x + I*y)}};
  2. {x1, x2} = Eigenvalues[H];
  3.  
  4. Plot3D[{Im[x1], Im[x2]}, {x, 0, 2}, {y, -1, 1}, PlotStyle -> {LightRed, LightRed}, Mesh -> 0]
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top