বিবরণTwo Slit Interference, 2500nm wl, 0.1mm d, close up average.png	English: DDensity plot of two slit interference of 2500nm light thtrough slits 0.1mm apart. The equation of the wave at a point is: ${\displaystyle u(x,y,t)=\sin \left(k\sqrt{{(x-\frac{d}{2})}^2+y^2}\right)+\sin \left(k\sqrt{{(x+\frac{d}{2})}^2+y^2}\right)}$ where d is the slit separations k is the wavenumber = 2π/λ x is the distance from the origin on the line containing the slits y is the distance from the plane contining the slits Thisp lot shows the intensity of the wave at a given point: ${\displaystyle I\approx A^2=4a^2{\cos }^2\frac{\delta }{2}}$ Where δ is the phase difference
তারিখ	১৩ মে ২০০৯
উৎস	নিজের কাজ
লেখক	Inductiveload
অনুমতি (এ ফাইলের পুনঃব্যবহার)	Public domainPublic domainfalsefalse আমি, এই কাজের স্বত্বাধিকারী, এতদ্দ্বারা আমি এই কাজকে পাবলিক ডোমেইন লাইসেন্সের আওতায় প্রকাশ করলাম। এটি বিশ্বব্যাপী প্রযোজ্য হবে। কিছু দেশে এটি আইনত সিদ্ধ নাও হতে পারে, যদি তাই হয়: আমি যে-কাউকে এই কাজটি যেকোনো উদ্দেশ্যে, বিনাশর্তে ব্যবহারের অনুমতি প্রদান করছি, যদি না সেই শর্তগুলো আইনত প্রয়োজনীয় হয়।

lambda = 2500*10^-9;
k = 2*Pi/lambda;
d = 0.1*10^-3;

path1[x_, y_] := Sqrt[y^2 + (x + d/2)^2];
path2[x_, y_] := Sqrt[y^2 + (x - d/2)^2];
phasediff[x_, y_] := (2*Pi/lambda )*(path1[x, y] - path2[x, y])

close = DensityPlot[
      x = xmm/1000;
      y = ymm/1000;
      Evaluate[
        4Cos[phasediff[x, y]/2]^2
        ],
      {xmm, -0.075, 0.075},
      {ymm, 0, 0.075},
      PlotPoints -> 2000,
      AspectRatio -> Automatic,
      ImageSize -> 1000,
      Mesh -> False,
      FrameLabel -> {"x/mm", "y/mm"}];