daily pastebin goal
81%
SHARE
TWEET

Untitled

a guest May 16th, 2018 96 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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
Top