summaryrefslogtreecommitdiff
path: root/fitter_check.m
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2013-09-17 13:48:10 -0400
committerEugeniy Mikhailov <evgmik@gmail.com>2013-09-17 13:48:10 -0400
commitccaa9c8855a7992495a77de88b6351e1274982b5 (patch)
treed4024ca4e6b237787ab5390f3cd2b7e71f4ab516 /fitter_check.m
parent4d08c162d5ce4ac8b7eaeb9d985bfef62c886e99 (diff)
downloadmode_match-ccaa9c8855a7992495a77de88b6351e1274982b5.tar.gz
mode_match-ccaa9c8855a7992495a77de88b6351e1274982b5.zip
renamed fitter_check to mode_match_demo to reflect it purpose
Diffstat (limited to 'fitter_check.m')
-rw-r--r--fitter_check.m39
1 files changed, 0 insertions, 39 deletions
diff --git a/fitter_check.m b/fitter_check.m
deleted file mode 100644
index b7866ae..0000000
--- a/fitter_check.m
+++ /dev/null
@@ -1,39 +0,0 @@
-%Permute all possible lens combinations out of set of lenses
-lens_set = [.075, .203]; %Given lenses of unique focal lengths
-lens_permutations = pick(lens_set,3,'or'); %3 lens solutions
-
-%Pre-defined Constants
-lambda= 1.064E-6 ; %Wavelength of beam
-Ltot= 1.010675025828971 ; %Length of optical system
-r0= 1.0E+100 ; %Initial radius of curvature
-w0= 2.563E-5 ; %Initial waist
-x0= 0 ; %Starting position of beam
-wf= 3.709E-5 ; %Desired final waist
-rf= 1.0E+100 ; %Desired final radius
-lens_width = .03; %Lens width
-show_lens_width = 1; %Set to 1 to enable display of lens width on solution propagation plot
-show_lens_position = 1; %Set to 1 to enable display of position of center of lens on solution propagation plot
-display_prop = [show_lens_width, show_lens_position];
-n_truncate = 3; %number of digits in truncated solution
-n_visualizations = 2; %number of best solutions to visualize
-n_hist = 1000; %number of sample points in histogram
-stability_max = 1; %max stability (y-axis) shown on energy vs. stability graph
-self_flag = 0; %Set to 1 to use Self's gaussian beam propagation, otherwise set to 0
-%End list
-
-q0=wr2q(w0,r0,lambda); %Calculate intial q
-qf=wr2q(wf,rf,lambda); %Calculate final q
-
-%Mode match
-[ possible_lens_placement, initial_lens_placement, possible_lens_set, possible_sample_energy] = mode_match( q0, qf, Ltot, lambda, lens_permutations, lens_width, self_flag );
-
-%Remove similar solutions
-[ possible_lens_placement_uniq, possible_lens_placement, possible_sample_energy, possible_lens_set, index ] = remove_similar_soln( possible_sample_energy, possible_lens_placement, possible_lens_set, n_truncate );
-
-
-%Visualize solutions
-pick_visualization( possible_sample_energy, possible_lens_placement_uniq, possible_lens_placement, possible_lens_set, index, n_visualizations, q0, qf, Ltot, lambda, lens_width, display_prop );
-
-%Plot energy vs. stability for each solution
-[stability] = stability_visualization( possible_lens_placement_uniq, q0, qf, Ltot, possible_lens_placement, possible_lens_set, lambda, n_visualizations, n_hist, index, self_flag );
-energy_vs_stability( possible_sample_energy, stability, index, stability_max)