aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--cavity_design.m14
1 files changed, 7 insertions, 7 deletions
diff --git a/cavity_design.m b/cavity_design.m
index f8b8bcd..7bddf35 100644
--- a/cavity_design.m
+++ b/cavity_design.m
@@ -27,7 +27,7 @@ lambda = 795e-9;
% follow figure 4: elements goes as d1, f1, d3, f2
% where f1 and f2 lens mirror equivalent with f_i=R_i/2
-abcd_cavity = abcd_lens(R2/2)*abcd_free_space(d2)*abcd_lens(R1/2)* abcd_free_space(d1);
+abcd_cavity = abcd_mirror(R2)*abcd_free_space(d2)*abcd_mirror(R1)* abcd_free_space(d1);
% spelling out abcd coefficients
A = abcd_cavity(1,1);
@@ -62,11 +62,11 @@ z0 = mod(z0,Ltot);
q0=wr2q(w0, inf, lambda); %Calculate initial q
% time to build the optics set
-lns1.abcd=abcd_lens( R1/2 ) ;
-lns1.x = d1;
-lns2.abcd=abcd_lens( R2/2 ) ;
-lns2.x = d1+d2;
-optics={lns1,lns2};
+mirror1.abcd = abcd_mirror( R1 ) ;
+mirror1.x = d1;
+mirror2.abcd = abcd_mirror( R2 ) ;
+mirror2.x = d1 + d2;
+optics={mirror1, mirror2};
% display properties setup
lens_width = .03; %Lens width
@@ -81,5 +81,5 @@ zfinal = Ltot;
qfinal = gbeam_propagation(zfinal, q0, z0, optics);
% show beam in the resonator
-[waste_at_the_end, radius_at_the_end, waist_at_lens_position] = solution_visualization(qstart,zstart, qfinal, zfinal, optics, lambda, lens_width, display_prop)
+[waste_at_the_end, radius_at_the_end, waist_at_mirrors] = solution_visualization(qstart,zstart, qfinal, zfinal, optics, lambda, lens_width, display_prop)