Archivo:Snells_law_wavefronts.gif
De Wikipedia, la enciclopedia encyclopedia
Snells_law_wavefronts.gif (225 × 227 píxeles; tamaño de archivo: 65 kB; tipo MIME: image/gif, bucleado, 10 frames, 0,1s)
Este es un archivo de Wikimedia Commons, un depósito de contenido libre hospedado por la Fundación Wikimedia. Más abajo se reproduce su página de descripción con la información sobre su origen y licencia. |
Titel
Resumen
DescripciónSnells law wavefronts.gif | ||||||
Fecha | (UTC) | |||||
Fuente | Own work, created with MATLAB. (Source code below.) | |||||
Autor | Oleg Alexandrov | |||||
Permiso (Reutilización de este archivo) |
|
|||||
Otras versiones |
|
Source code
% Illustration of Snell's law
function main()
% indexes of refraction
n1=1.0;
n2=1.5;
sign = -1;% is the source up or down?
O=[0, -1*sign];
k=500;
% KSmrq's colors
red = [0.867 0.06 0.14];
blue = [0, 129, 205]/256;
green = [0, 200, 70]/256;
yellow = [254, 194, 0]/256;
white = 0.99*[1, 1, 1];
black = [0, 0, 0];
gray = 0.5*white;
color1=red;
color2=blue;
color3=gray;
lw = 3;
plot_line=0;
Theta=linspace(0, 2*pi, k);
V=0*Theta; W=0*Theta;
S0=7;
spacing=0.45;
p=floor(S0/spacing);
S=linspace(0, S0, p+1);
spacing=S(2)-S(1);
num_frames = 10;
for frame_iter=1:num_frames
figure(1); clf; hold on; axis equal; axis off;
% plot the interface between diellectrics
L=1.2*S0;
plot([-L, L], [0, 0], 'color', color3, 'linewidth', lw);
% plot a ray
plot_line=1;
s=L;
theta=pi/3; wfr(s, theta, n1, n2, O, sign, plot_line, color1, lw);
% plot the wafefronts
plot_line=0;
for i=1:p
s=S(i)+spacing*(frame_iter-1)/num_frames;
for j=1:k
theta=Theta(j);
[V(j), W(j)]=wfr(s, theta, n1, n2, O, sign, plot_line, color1, lw);
end
plot(V, W, 'color', color2, 'linewidth', lw);
end
% dummy points to enlarge the bounding box
plot(0, S0+2.5*spacing, '*', 'color', white);
plot(0, -(S0+2.5*spacing)/n2, '*', 'color', white);
% to know where to crop later
Lx=3.2; Ly=Lx; shift = 1;
plot([-Lx, Lx, Lx, -Lx -Lx], ...
[-Ly, -Ly, Ly, Ly, -Ly]+shift);
file = sprintf('Frame%d.eps', 1000+frame_iter);
disp(file);
saveas(gcf, file, 'psc2')
end
end
% Converted to gif with the UNIX command
% convert -density 100 -antialias Frame10* Snell_animation.gif
% then cropped in Gimp
function [a, b]=wfr(s, theta, n1, n2, O, sign, plot_line, color1, lw);
X=O+s*[sin(theta), sign*cos(theta)];
if( sign*X(2) > 0 )
t=-sign*O(2)/cos(theta);
X0=O+t*[sin(theta), sign*cos(theta)];
if (plot_line == 1)
plot([O(1), X0(1)], [O(2), X0(2)], 'color', color1, 'linewidth', lw, 'linestyle', '--');
end
d = norm(O-X0);
r = (s-d)*(n2/n1)^(sign);
theta2=asin(n1*sin(theta)/n2);
XE=X0+r*[sin(theta2), sign*cos(theta2)];
else
XE = X;
end
a = XE(1);
b = XE(2);
if (plot_line==1)
plot([X0(1), XE(1)], [X0(2), XE(2)], 'color', color1, 'linewidth', lw, 'linestyle', '--');
end
end
Elementos representados en este archivo
representa a
Algún valor sin elemento de Wikidata
Historial del archivo
Haz clic sobre una fecha y hora para ver el archivo tal como apareció en ese momento.
Fecha y hora | Miniatura | Dimensiones | Usuario | Comentario | |
---|---|---|---|---|---|
actual | 09:59 5 jul 2009 | 225 × 227 (65 kB) | Capmo | reduced to 16 colors with no quality loss | |
06:31 2 ene 2008 | 225 × 227 (148 kB) | Oleg Alexandrov | {{Information |Description=Illustration of wavefronts in the context of Snell's law. |Source=self-made with MATLAB |Date=05:36, 1 January 2008 (UTC) |Author= Oleg Alexandrov |Permission= |oth |
Usos del archivo
La siguiente página usa este archivo:
Uso global del archivo
Las wikis siguientes utilizan este archivo:
- Uso en ast.wikipedia.org
- Uso en bg.wikipedia.org
- Uso en cs.wikiversity.org
- Uso en cy.wikipedia.org
- Uso en de.wikipedia.org
- Uso en de.wikibooks.org
- Uso en el.wikipedia.org
- Uso en en.wikipedia.org
- Snell's law
- User talk:Clarknova
- User:Oleg Alexandrov/Pictures
- User:Devinma
- Wikipedia:Featured pictures/Diagrams, drawings, and maps/Diagrams
- User talk:Oleg Alexandrov/Archive13
- Wikipedia:Featured pictures thumbs/15
- Wikipedia:Featured picture candidates/January-2009
- Wikipedia:Featured picture candidates/Snells law wavefronts
- Wikipedia:Wikipedia Signpost/2009-01-10/Features and admins
- Wikipedia:Picture of the day/September 2009
- Template:POTD/2009-09-23
- Wikipedia:Wikipedia Signpost/2009-01-10/SPV
- User:VGrigas (WMF)/Quality Media
- Wikipedia:Wikipedia Signpost/Single/2009-01-10
- Uso en en.wikibooks.org
- Uso en en.wikiversity.org
- Uso en eo.wikipedia.org
- Uso en et.wikipedia.org
- Uso en fa.wikipedia.org
- Uso en frr.wikipedia.org
- Uso en fr.wikipedia.org
- Uso en fr.wikibooks.org
- Uso en he.wikipedia.org
- Uso en hi.wikipedia.org
- Uso en hr.wikipedia.org
- Uso en it.wikipedia.org
- Uso en ka.wikipedia.org
- Uso en ko.wikipedia.org
- Uso en lmo.wikipedia.org
- Uso en mk.wikipedia.org
- Uso en nl.wikipedia.org
Ver más uso global de este archivo.