diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2013-01-16 14:27:10 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2013-01-16 14:27:10 -0500 |
| commit | 37d09478a8fca4e1229dcb1246c9f23f1f6118df (patch) | |
| tree | 79e2d5f9179987b46b5b743c552c29f94ffb999e /demo_prism_disk_coupling.m | |
| parent | 28ef703f718ce7f540864ca8f9a301f8d7d3f3e0 (diff) | |
| download | wgmr-37d09478a8fca4e1229dcb1246c9f23f1f6118df.tar.gz wgmr-37d09478a8fca4e1229dcb1246c9f23f1f6118df.zip | |
move code to directory with speaking name
Diffstat (limited to 'demo_prism_disk_coupling.m')
| -rw-r--r-- | demo_prism_disk_coupling.m | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/demo_prism_disk_coupling.m b/demo_prism_disk_coupling.m deleted file mode 100644 index e809968..0000000 --- a/demo_prism_disk_coupling.m +++ /dev/null @@ -1,29 +0,0 @@ -%% Calculates incident angle for proper coupling into the disc via prism - -% angle of the prism faces in degrees -prism_angle_in_degrees = 45; - -prism_angle = prism_angle_in_degrees*pi/180; - -%% prism index of refraction -% Rutile (TiO2) see http://refractiveindex.info/?group=CRYSTALS&material=TiO2 -n_rutile_o = 2.4885; % p - polarization -n_rutile_e = 2.75324; % s - polarization - -n_prism=n_rutile_o ; % for horizontal or p polarization - -%% disk material index of refraction -% Magnesium Fluoride (MgF2) see http://refractiveindex.info/?group=CRYSTALS&material=MgF2 -n_MgF2_o = 1.3751; -n_MgF2_e = 1.38679; - -% Measured -n_MgF2_p = 1.465; % p-polarization - - -n_disk=n_MgF2_p; -coupling_description='Rutile prism, MgF_{2} disk, p-polarization'; - -% calculate coupling angle and draw coupling solution with annotations -prism_disk_coupling(prism_angle_in_degrees, n_disk, n_prism, coupling_description); - |