summaryrefslogtreecommitdiff
path: root/solution_visualization.m
diff options
context:
space:
mode:
authorMatt Argao <mcargao@email.wm.edu>2012-11-13 16:53:59 -0500
committerMatt Argao <mcargao@email.wm.edu>2012-11-13 16:53:59 -0500
commit43599adb04a9fa70d942a8fd30d42ddccbc97718 (patch)
treec6e4410c8f34fb765766573098431f6bebc3354f /solution_visualization.m
parent08021ec0d6a395b3e56e0aca73b35a88b80eb709 (diff)
downloadmode_match-43599adb04a9fa70d942a8fd30d42ddccbc97718.tar.gz
mode_match-43599adb04a9fa70d942a8fd30d42ddccbc97718.zip
Added descriptions
Diffstat (limited to 'solution_visualization.m')
-rw-r--r--solution_visualization.m14
1 files changed, 6 insertions, 8 deletions
diff --git a/solution_visualization.m b/solution_visualization.m
index 6eebae6..c099d78 100644
--- a/solution_visualization.m
+++ b/solution_visualization.m
@@ -1,18 +1,18 @@
function waste_at_the_end = solution_visualization(q0,x0, qf, xf, optics, lambda)
-
-
+%Propagates beam with given input parameters
+% Forward propagation and backward propagation are taken in order to
+% visualize reasonable solutions.
x=linspace(x0,xf,1000); % we will calculate beam profile between x0 and xf
-%fprintf('======== Forward propagation ======\n')
+%Forward propagation
q_forward=gbeam_propagation(x,q0,x0,optics);
[w_forward,r_forward]=q2wr(q_forward, lambda);
-%fprintf('======== Backward propagation =====\n')
-
+%Backward propagation
q_backward=gbeam_propagation(x,qf,xf,optics);
[w_backward,r_backward]=q2wr(q_backward, lambda);
-%fprintf('========= Plotting ================\n')
+%Plot beam profile
plot ( ...
x,w_forward, '-r', ...
x,-w_forward, '-r', ...
@@ -21,7 +21,5 @@ plot ( ...
legend({'forward propagation', '', 'backward propagation', ''})
[waste_at_the_end,radius_at_the_end] = q2wr(q_forward(end), lambda);
-%waste_at_the_end
-%radius_at_the_end