aboutsummaryrefslogtreecommitdiff
path: root/cavity_q_parameter_at_mirror.example.m
diff options
context:
space:
mode:
Diffstat (limited to 'cavity_q_parameter_at_mirror.example.m')
-rw-r--r--cavity_q_parameter_at_mirror.example.m18
1 files changed, 18 insertions, 0 deletions
diff --git a/cavity_q_parameter_at_mirror.example.m b/cavity_q_parameter_at_mirror.example.m
new file mode 100644
index 0000000..60a0d8e
--- /dev/null
+++ b/cavity_q_parameter_at_mirror.example.m
@@ -0,0 +1,18 @@
+source("abcd.m")
+source("cavity.m")
+
+lambda=1.064e-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)
+q2waste(q_at_mirror,lambda)
+q2radius(q_at_mirror,lambda)
+