File:SecondQuantization.gif
Summary
| Description |
English: Equivalence between a system of oscillators and a system of bosons. (Source below)
Español: Equivalencia entre un sistema de osciladores y un sistema de bosones. (Código abajo)
Ambos sistemas son equivalentes, entendiendo que las distintas frecuencias ωi del sistema 1 dan las posibles energías ℏωi para las partículas del sistema 2; y que el nivel de excitación del oscilador ωi en el sistema 1 es el número de partículas del sistema 2 con energía ℏωi. Por ejemplo, en la imagen, el oscilador azul está en el 3er nivel de energía, mientras que el rojo está en el 2º; por otro lado, hay 3 partículas con energía ℏωazul y 2 con ℏωrojo. |
| Date | |
| Source | Own work |
| Author | kismalac |
This diagram was created with Mathematica by n.Category:PNG created with Mathematica#SecondQuantization.gif
Mathematica code
English: Not very elegant, though.
Español: Poco elegante, me temo.
ax=-2;bx=2;ay=-2.2;by=-0.2;r=0.08;dx=bx-ax;dy=by-ay;
a=Graphics[{EdgeForm[Thickness[0.012]],White,Rectangle[{ax,ay},{bx,by}]}];
b=Plot[{2(x+1)^2},{x,-2,0},PlotStyle->{Thickness[.01],Blue}];
c=Plot[{4(x-1)^2},{x,1-1/Sqrt[2],1+1/Sqrt[2]},PlotStyle->{Thickness[.01],Red}];
fnmin[x_]:=-Sqrt[x/2]-1;fnmax[x_]:=Sqrt[x/2]-1;
fmmin[x_]:=1-Sqrt[x/4];fmmax[x_]:=1+Sqrt[x/4];
l1=1/6;l2=3/6;l3=5/6;l4=7/6;l5=9/6;
ni=Graphics[{Dashed,Thickness[.006],{Blue,Line[{{fnmin[l1],l1},{fnmax[l1],l1}}],Line[{{fnmin[l2],l2},{fnmax[l2],l2}}],Line[{{fnmin[l3],l3},{fnmax[l3],l3}}],Line[{{fnmin[l4],l4},{fnmax[l4],l4}}],Line[{{fnmin[l5],l5},{fnmax[l5],l5}}]},{Red,Line[{{fmmin[2l1],2l1},{fmmax[2l1],2l1}}],Line[{{fmmin[2l2],2l2},{fmmax[2l2],2l2}}],Line[{{fmmin[2l3],2l3},{fmmax[2l3],2l3}}]}}];
osc1[t_]:=-1+(fnmax[l3]-fnmin[l3])/2 Cos[4 t];osc2[t_]:=1+(fmmax[2l2]-fmmin[2l2])/2 Cos[8t];
p[x_,v_,t_]:=x+v t;n[x_,v_,t_,a_,b_]:=Floor[(p[x,v,t]-a)/(b-a)];pospar[x_,v_,t_,a_,b_]:=p[x,v,t]-n[x,v,t,a,b](b-a);
trax[t_,vx_,x0_]:=pospar[x0,vx,t,ax,bx](-1)^n[x0,vx,t,ax,bx]+(bx+ax)/2(1-(-1)^n[x0,vx,t,ax,bx]);tray[t_,vy_,y0_]:=pospar[y0,vy,t,ay,by](-1)^n[y0,vy,t,ay,by]+(by+ay)/2(1-(-1)^n[y0,vy,t,ay,by]);
v1=0.8*3/Sqrt[2];v2=2 v1/0.8;
g[s_]:=Show[a,b,c,ni,Graphics[{{Black,Disk[{osc1[s],l3},r],Disk[{osc2[s],2l2},r]},EdgeForm[{Thick,Black}],{Blue,Disk[{trax[s,v1 Cos[0.7],ax+0.1dx],tray[s,v1 Sin[0.7],ay+0.7 dy]},r],Disk[{trax[s,-v1 Cos[0.5],ax+0.5dx],tray[s,v1 Sin[0.5],ay+0.1dy]},r],Disk[{trax[s,-v1 Sin[0.6],ax+0.7dx],tray[s,-v1 Cos[0.6],by-0.1dy]},r]},{Red,Disk[{trax[s,v2 Sin[0.4],ax+0.3dx],tray[s,v2 Cos[0.4],ay+0.3dy]},r],Disk[{trax[s,-v2 Cos[0.55],bx-0.1ax],tray[s,-v2 Sin[0.55],by-0.2dy]},r]},{White,Line[{{ax-1.1r,ay-1.1r},{bx+1.1r,ay-1.1r}}]}}]]
Licensing
I, the copyright holder of this work, hereby publish it under the following license:
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license.
- You are free:
- to share – to copy, distribute and transmit the work
- to remix – to adapt the work
- Under the following conditions:
- attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
- share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
