File:Two Slit Interference, 800nm wl, 0.1mm d, distant average.png
Jump to navigation
Jump to search
Size of this preview: 800 × 400 pixels. Other resolutions: 320 × 160 pixels | 640 × 320 pixels | 1,000 × 500 pixels.
Original file (1,000 × 500 pixels, file size: 315 KB, MIME type: image/png)
 |
This is a file from the Wikimedia Commons |
| Description |
Density plot of two slit inteference of 800nm light thtrough slits 0.1mm apart. The equation is: where
|
||
| Date | |||
| Source |
Own work  This diagram was created with Mathematica. |
||
| Author | Inductiveload | ||
| Permission (Reusing this file) |
|
Mathematica Code
|
Please be aware that at the time of uploading (19:08, 17 June 2007 (UTC)), this code may take a significant amount of time to execute on a consumer-level computer. | 
|
u[x_, y_, z_, t_] := Sin[k Sqrt[y^2 + (x + d/2)^2 + z^2] + ω t] +
Sin[k Sqrt[y^2 + (x - d/2)^2 + z^2] + ω t];
farav = DensityPlot[
x = xmm/1000;
y = ymm/1000;
Sum[
Abs[u[x, y, 0, n]],
{n, 0, τ, τ/40}]/40,
{xmm, -100, 100},
{ymm, 0, 5000},
PlotPoints -> 1000,
AspectRatio -> 0.5,
ImageSize -> 1000,
Mesh -> False,
FrameLabel -> {"y/mm", "z/mm"}]
File history
Click on a date/time to view the file as it appeared at that time.
| Date/Time | Thumbnail | Dimensions | User | Comment | |
|---|---|---|---|---|---|
| current | 19:08, 17 June 2007 | | 1,000 × 500 (315 KB) | Inductiveload | {{Information |Description=Density plot of two slit inteference of 800nm light thtrough slits 0.1mm apart. The equation is: <math>u(x,y,t)= \sin \left( k \sqrt{ \left( x-\frac{d}{2} \right)^2 + y^2} \right)+ \sin \left( k \sqrt{ \left( x+\frac{d}{2} \righ |
File usage
The following page uses this file:
