বিবরণTwo Slit Interference, 2500nm wl, 0.1mm d, close up.png	English: Density plot of two slit interference of 800nm light thtrough slits 0.1mm apart. The equation 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
তারিখ	১৩ মে ২০০৯
উৎস	নিজের কাজ
লেখক	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[
        Sin[k *path1[x, y]] +
          Sin[k *path2[x, y]]
        ],
      {xmm, -0.075, 0.075},
      {ymm, 0, 0.075},
      PlotPoints -> 2000,
      AspectRatio -> Automatic,
      ImageSize -> 1000,
      Mesh -> False,
      FrameLabel -> {"x/mm", "y/mm"}];