aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2012-10-17 21:19:12 -0400
committerEugeniy Mikhailov <evgmik@gmail.com>2012-10-17 21:19:12 -0400
commit6f5c4078d2e31c0705e564e844a3e526a30a2121 (patch)
treede1374bdfe6dbebac34e31836faa3bddc2abefe2
parentaa5eb5d38f9456944db161b71c46c9a2976b62c6 (diff)
downloadwgmr-6f5c4078d2e31c0705e564e844a3e526a30a2121.tar.gz
wgmr-6f5c4078d2e31c0705e564e844a3e526a30a2121.zip
plotting of the normal for a front face fixed
-rw-r--r--coupling_angles.m4
1 files changed, 2 insertions, 2 deletions
diff --git a/coupling_angles.m b/coupling_angles.m
index c7f2cb9..d425677 100644
--- a/coupling_angles.m
+++ b/coupling_angles.m
@@ -96,8 +96,8 @@ x_norm_out=linspace(x_cross_1,1);
y_norm_out=y_cross_1+(x_norm_out-x_cross_1)*tan(theta_norm_rlh);
% coordinates of normal inside the prism
-y_norm_in=linspace(y_cross_1,0);
-x_norm_in=x_cross_1+(y_norm_in-y_cross_1)*tan(theta_norm_rlh+pi);
+x_norm_in=linspace(x_cross_1,0);
+y_norm_in=y_cross_1+(x_norm_in-x_cross_1)*tan(theta_norm_rlh);
plot(x_norm_out, y_norm_out, 'b-', x_norm_in, y_norm_in, 'b-');
%% arc to show theta_air