diff options
author | evmik <evmik@ligo.mit.edu> | 2006-07-12 12:22:38 -0400 |
---|---|---|
committer | evmik <evmik@ligo.mit.edu> | 2006-07-12 12:22:38 -0400 |
commit | f819eaf5e18cce436d39412c4578f81cf65eef9a (patch) | |
tree | a825c1114d427c4d90394a1b46444c5119efc6f8 | |
parent | 357c8a7a3bec296222f0e7f766cbbf94543a0ab8 (diff) | |
download | mode_match-f819eaf5e18cce436d39412c4578f81cf65eef9a.tar.gz mode_match-f819eaf5e18cce436d39412c4578f81cf65eef9a.zip |
one more example file
darcs-hash:20060712162238-a6199-c18a419b5a6ab518a1f417e317dc4c10febd0f85
-rw-r--r-- | cavity_q_parameter_at_mirror_for_532nm.example.m | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/cavity_q_parameter_at_mirror_for_532nm.example.m b/cavity_q_parameter_at_mirror_for_532nm.example.m new file mode 100644 index 0000000..1b7d43b --- /dev/null +++ b/cavity_q_parameter_at_mirror_for_532nm.example.m @@ -0,0 +1,18 @@ +source("abcd.m") +source("cavity.m") + +lambda=.532e-6 +R1=.01 +R2=.01 + +cavity_abcd = abcd_lens(R1/2) * abcd_free_space(.007) * abcd_free_space(.01/1.8) * abcd_free_space(0.0036) + +global A = cavity_abcd(1,1) +global B = cavity_abcd(1,2) +global C = cavity_abcd(2,1) +global D = cavity_abcd(2,2) + +q_at_mirror=find_q_at_the_mirror(1/R1+3i) +w_at_mirror=q2waste(q_at_mirror,lambda) +R_at_mirror=q2radius(q_at_mirror,lambda) + |