File:Snells law wavefronts.svgeps', 'psc2') %plot2svg('Snells_law_wavefronts.svg') function [a, b]=wfr(s, theta, n1, n2, O, sign, plot_line, color1, lw); X=O+s*[sin(theta), sign*cos(theta)];
File:Sphere (parameters r, d).svgstroke='none')) # draw radius line radius_angle = radians(-227) radius_line = doc.line(start=(0, 0), end=(0.99*r*cos(radius_angle),0.99*r*sin(radius_angle)),