aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2011-04-13 10:52:39 -0400
committerEugeniy Mikhailov <evgmik@gmail.com>2011-04-13 10:52:39 -0400
commitbe8a8f187a4eb3b274a951e6b8c3290d228604c4 (patch)
treed40589c8e1b9325ca3ccaa2aa55cafdebce420fe /examples
parent5fd9b5510e7a00295e6e6184a2e73953a2b182ab (diff)
downloadmode_match-be8a8f187a4eb3b274a951e6b8c3290d228604c4.tar.gz
mode_match-be8a8f187a4eb3b274a951e6b8c3290d228604c4.zip
moved examples to example directory
Ignore-this: 4a958f7faca1d5841bd9a139680aa847 darcs-hash:20110413145239-067c0-2fefe84aeeb8bcf493e3cafaee61ef483e2e2e2b
Diffstat (limited to 'examples')
-rw-r--r--examples/answ.Diabolo2OPO_seed_profile.txt32
-rw-r--r--examples/answ.txt32
-rw-r--r--examples/answ.txt.example14
-rw-r--r--examples/answ.txt.example_with_coupling_mirror_taken_in_account32
4 files changed, 110 insertions, 0 deletions
diff --git a/examples/answ.Diabolo2OPO_seed_profile.txt b/examples/answ.Diabolo2OPO_seed_profile.txt
new file mode 100644
index 0000000..5e6488a
--- /dev/null
+++ b/examples/answ.Diabolo2OPO_seed_profile.txt
@@ -0,0 +1,32 @@
+source("abcd.m")
+##########################################
+lambda= 1.064E-6
+Ltot= 0.55
+r0= 1e100
+w0= 0.00675
+f1=0.1526
+lns1.abcd=abcd_lens( f1)
+lns1.x= 0.2
+f2=0.019
+lns2.abcd=abcd_lens( f2)
+lns2.x= lns1.x+ f1 + f2
+lns3.abcd=abcd_lens( 0.0629)
+lns3.x= 0.500
+# befrore we calculate final waste we need to take in account propagation through the thick mirror
+# since we try to match to the waste right in front of front coupling mirror
+r_at_mirror=.01
+w_at_mirror=83.729e-6
+q_at_mirror=waste_r2q(w_at_mirror, r_at_mirror, lambda)
+n_fused_cilica=1.44968
+R_of_mirror=.01
+mirror_thickness=6.35e-3
+f_of_mirrr_formed_lense=1/((n_fused_cilica-1)*(1/(-R_of_mirror)))
+abcd_of_mirrr_formed_lense=abcd_lens(f_of_mirrr_formed_lense)
+abcd_of_propagation_through_mirror=abcd_free_space(mirror_thickness/n_fused_cilica)
+abcd_of_thick_mirror=abcd_of_propagation_through_mirror*abcd_of_mirrr_formed_lense
+# q right in front of front coupling mirror of the cavity
+q_infront_of_mirror=q_afteer_element(q_at_mirror, abcd_of_thick_mirror)
+wf=q2waste(q_infront_of_mirror,lambda)
+# we need minus for rf since we will solve injection to the cavity problem
+rf= - q2radius(q_infront_of_mirror,lambda)
+##########################################
diff --git a/examples/answ.txt b/examples/answ.txt
new file mode 100644
index 0000000..c1036f8
--- /dev/null
+++ b/examples/answ.txt
@@ -0,0 +1,32 @@
+source("abcd.m")
+##########################################
+lambda= 1.064E-6
+Ltot= 0.55
+r0= 1e100
+w0= 0.00675
+f1=0.1526;
+lns1.abcd=abcd_lens( f1) ;
+lns1.x= 0.2;
+f2=0.019;
+lns2.abcd=abcd_lens( f2) ;
+lns2.x= lns1.x+ f1 + f2;
+lns3.abcd=abcd_lens( 0.0629) ;
+lns3.x= 0.500;
+# befrore we calculate final waste we need to take in account propagation through the thick mirror
+# since we try to match to the waste right in front of front coupling mirror
+r_at_mirror=.01;
+w_at_mirror=83.729e-6;
+q_at_mirror=waste_r2q(w_at_mirror, r_at_mirror, lambda);
+n_fused_cilica=1.44968;
+R_of_mirror=.01;
+mirror_thickness=6.35e-3;
+f_of_mirrr_formed_lense=1/((n_fused_cilica-1)*(1/(-R_of_mirror)));
+abcd_of_mirrr_formed_lense=abcd_lens(f_of_mirrr_formed_lense);
+abcd_of_propagation_through_mirror=abcd_free_space(mirror_thickness/n_fused_cilica);
+abcd_of_thick_mirror=abcd_of_propagation_through_mirror*abcd_of_mirrr_formed_lense;
+# q right in front of front coupling mirror of the cavity
+q_infront_of_mirror=q_afteer_element(q_at_mirror, abcd_of_thick_mirror);
+wf=q2waste(q_infront_of_mirror,lambda)
+# we need minus for rf since we will solve injection to the cavity problem
+rf= - q2radius(q_infront_of_mirror,lambda)
+##########################################
diff --git a/examples/answ.txt.example b/examples/answ.txt.example
new file mode 100644
index 0000000..37ba2ee
--- /dev/null
+++ b/examples/answ.txt.example
@@ -0,0 +1,14 @@
+##########################################
+lambda= 1.064E-6
+Ltot= 1.010675025828971
+r0= 1.0E+100
+w0= 2.563E-5
+lns1.abcd=abcd_lens( 0.075 )
+lns1.x= 0.21358727296049
+lns2.abcd=abcd_lens( 0.075 )
+lns2.x= 0.40361319425309
+lns3.abcd=abcd_lens( 0.203 )
+lns3.x= 0.80361319425309
+wf= 3.709E-5
+rf= 1.0E+100
+##########################################
diff --git a/examples/answ.txt.example_with_coupling_mirror_taken_in_account b/examples/answ.txt.example_with_coupling_mirror_taken_in_account
new file mode 100644
index 0000000..5e6488a
--- /dev/null
+++ b/examples/answ.txt.example_with_coupling_mirror_taken_in_account
@@ -0,0 +1,32 @@
+source("abcd.m")
+##########################################
+lambda= 1.064E-6
+Ltot= 0.55
+r0= 1e100
+w0= 0.00675
+f1=0.1526
+lns1.abcd=abcd_lens( f1)
+lns1.x= 0.2
+f2=0.019
+lns2.abcd=abcd_lens( f2)
+lns2.x= lns1.x+ f1 + f2
+lns3.abcd=abcd_lens( 0.0629)
+lns3.x= 0.500
+# befrore we calculate final waste we need to take in account propagation through the thick mirror
+# since we try to match to the waste right in front of front coupling mirror
+r_at_mirror=.01
+w_at_mirror=83.729e-6
+q_at_mirror=waste_r2q(w_at_mirror, r_at_mirror, lambda)
+n_fused_cilica=1.44968
+R_of_mirror=.01
+mirror_thickness=6.35e-3
+f_of_mirrr_formed_lense=1/((n_fused_cilica-1)*(1/(-R_of_mirror)))
+abcd_of_mirrr_formed_lense=abcd_lens(f_of_mirrr_formed_lense)
+abcd_of_propagation_through_mirror=abcd_free_space(mirror_thickness/n_fused_cilica)
+abcd_of_thick_mirror=abcd_of_propagation_through_mirror*abcd_of_mirrr_formed_lense
+# q right in front of front coupling mirror of the cavity
+q_infront_of_mirror=q_afteer_element(q_at_mirror, abcd_of_thick_mirror)
+wf=q2waste(q_infront_of_mirror,lambda)
+# we need minus for rf since we will solve injection to the cavity problem
+rf= - q2radius(q_infront_of_mirror,lambda)
+##########################################