diff options
-rw-r--r-- | coupling_angles.m | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/coupling_angles.m b/coupling_angles.m index d425677..24ddeb9 100644 --- a/coupling_angles.m +++ b/coupling_angles.m @@ -89,7 +89,7 @@ x_out_1=linspace(x_out_strt, x_out_stop); y_out_1=y_out_strt+tan(theta_air_rlh)*(x_out_1-x_out_strt); plot(x_out_1, y_out_1, 'r-'); -%% draw normal at the point of 1st face intercection +%% draw normal at the point of 1st face intersection theta_norm_rlh=pi/2-prism_angle; % coordinates of normal outside the prism x_norm_out=linspace(x_cross_1,1); |