diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-04-13 01:44:31 -0400 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-04-13 01:44:31 -0400 |
| commit | 03217583a032645ca1bf1722ac731ab1f0fde2df (patch) | |
| tree | 5ff9ba49581c0c2d6329ea97340a821deab95d79 | |
| parent | 3fe04c1c780cd7e6eb75c280b8eb1987f236eabe (diff) | |
| download | mode_match-03217583a032645ca1bf1722ac731ab1f0fde2df.tar.gz mode_match-03217583a032645ca1bf1722ac731ab1f0fde2df.zip | |
suppressed uwanted output
Ignore-this: 2a31dd58f92bfed4a8371d39fb61637b
darcs-hash:20110413054431-067c0-cbc9e596536987a9f86a38025d0645fc3015e7e5
| -rw-r--r-- | answ.txt | 38 |
1 files changed, 19 insertions, 19 deletions
@@ -4,28 +4,28 @@ 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 +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 +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) +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) |