-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy pathcavity-parameters.nb
623 lines (593 loc) · 26.7 KB
/
cavity-parameters.nb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 11.3' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 27175, 615]
NotebookOptionsPosition[ 25023, 572]
NotebookOutlinePosition[ 25378, 588]
CellTagsIndexPosition[ 25335, 585]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["Constants", "Subsubsection",
CellChangeTimes->{{3.7024715441371193`*^9,
3.702471545741761*^9}},ExpressionUUID->"c1a95efd-3040-4811-96e4-\
24fe274612bb"],
Cell[BoxData[{
RowBox[{
RowBox[{"\[Epsilon]0", " ", "=", " ",
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<ElectricConstant\>\""}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[HBar]", "=",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<PlanckConstant\>\""}], "]"}], "/",
RowBox[{"(",
RowBox[{"2", "Pi"}], ")"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"c", "=",
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<c\>\""}], "]"}]}], ";"}]}], "Input",
CellChangeTimes->{{3.702468733968328*^9, 3.7024687703553658`*^9}, {
3.702470214790099*^9, 3.702470271044743*^9}, {3.702470478592338*^9,
3.7024706171216908`*^9}, {3.70247084918188*^9, 3.702471013026802*^9}, {
3.7024710606586637`*^9, 3.702471092491654*^9}, {3.702471398203206*^9,
3.702471550902692*^9}, {3.7024715886038094`*^9, 3.702471597810555*^9}, {
3.7024717736934147`*^9, 3.702471775597753*^9}, {3.718721199945944*^9,
3.7187212077785788`*^9}},
CellLabel->
"In[1367]:=",ExpressionUUID->"fc00ce49-c200-4dc8-b4aa-240d73aa38e1"]
}, Open ]],
Cell[CellGroupData[{
Cell["Cavity specs", "Subsubsection",
CellChangeTimes->{{3.7024715441371193`*^9, 3.702471545741761*^9}, {
3.702471605105187*^9,
3.702471607135982*^9}},ExpressionUUID->"b47dc4a5-7207-4755-a215-\
aba5fbb30890"],
Cell[TextData[{
"In order that we choose realistic properties for the cavity mirrors, this \
handles the conversion from basic parameters of the cavity (length, mirror \
curvature, finesse etc) to the parameters entered into our model (\[Kappa], \
",
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox["g", "0"], " ", "etc"}], ")"}], TraditionalForm]],
FormatType->"TraditionalForm",ExpressionUUID->
"c1713afe-57d4-4e33-86db-479ea81d0800"],
"."
}], "Text",
CellChangeTimes->{{3.746868207638536*^9,
3.746868341771282*^9}},ExpressionUUID->"7b3a5955-e0da-4ba5-91e2-\
a504641916e5"],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"Lcav", "=",
RowBox[{"Quantity", "[",
RowBox[{"40", ",", "\"\<micron\>\""}], "]"}]}], ";"}],
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
RowBox[{"Lcav", "=",
RowBox[{"Quantity", "[",
RowBox[{"74", ",", "\"\<micron\>\""}], "]"}]}], ";"}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"R", " ", "=", " ",
RowBox[{"Quantity", "[",
RowBox[{"5", ",", "\"\<cm\>\""}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Fin", " ", "=", " ", "117812"}],
RowBox[{"(*",
RowBox[{"Real", " ", "cavity"}], "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"Fin1", ",", "Fin2"}], "}"}], "=",
RowBox[{"{",
RowBox[{"100000", ",", "2000000"}], "}"}]}],
RowBox[{"(*",
RowBox[{"'",
RowBox[{"Ideal", "'"}], " ", "cavity"}], "*)"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Omega]cav", "=", " ",
RowBox[{"2", "Pi", " ",
RowBox[{"(",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"384.2304844685", ",", "\"\<THz\>\""}], "]"}], " ", "-", " ",
RowBox[{"Quantity", "[",
RowBox[{"302.0738", ",", "\"\<MHz\>\""}], "]"}], " ", "+", " ",
RowBox[{"Quantity", "[",
RowBox[{"4.27167663181519", ",", "\"\<GHz\>\""}], "]"}]}], ")"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Lambda]cav", "=",
RowBox[{"UnitConvert", "[",
RowBox[{
RowBox[{"2", "Pi", " ",
RowBox[{
RowBox[{"Quantity", "[",
RowBox[{"1", ",", "\"\<c\>\""}], "]"}], "/", "\[Omega]cav"}]}], ",",
"\"\<nm\>\""}], "]"}]}], "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"\[Omega]0", " ", "=", " ",
RowBox[{"\[Sqrt]",
RowBox[{"(",
RowBox[{
FractionBox["\[Lambda]cav", "2"],
RowBox[{"\[Sqrt]",
RowBox[{"(",
RowBox[{
FractionBox["Lcav", "2"],
RowBox[{"(",
RowBox[{"R", "-",
FractionBox["Lcav", "2"]}], ")"}]}], ")"}]}]}], ")"}]}]}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Omega]0", " ", "=", " ",
RowBox[{"\[Sqrt]",
RowBox[{"(",
RowBox[{
FractionBox["\[Lambda]cav", "Pi"],
RowBox[{"\[Sqrt]",
RowBox[{"(",
RowBox[{
FractionBox["Lcav", "2"],
RowBox[{"(",
RowBox[{"R", "-",
FractionBox["Lcav", "2"]}], ")"}]}], ")"}]}]}], ")"}]}]}],
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"\[Omega]0", " ", "=", " ",
RowBox[{"\[Sqrt]",
RowBox[{"(",
RowBox[{
FractionBox["\[Lambda]cav",
RowBox[{"2", " ", "Pi"}]],
RowBox[{"\[Sqrt]",
RowBox[{"(",
RowBox[{"Lcav",
RowBox[{"(",
RowBox[{
RowBox[{"2", "R"}], "-", "Lcav"}], ")"}]}], ")"}]}]}], ")"}]}]}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{"V", "=",
RowBox[{"UnitConvert", "[",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"Pi", " ",
SuperscriptBox["\[Omega]0", "2"]}], "2"], "Lcav"}], ",",
"\"\<cubic microns\>\""}], "]"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Omega]FRS", "=",
RowBox[{"UnitConvert", "[",
RowBox[{
RowBox[{"N", "@",
FractionBox[
RowBox[{"c", " ", "Pi"}], "Lcav"]}], ",", "\"\<GHz\>\""}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"\[Omega]FWHM1", ",", "\[Omega]FWHM2"}], "}"}], "=",
RowBox[{"UnitConvert", "[",
RowBox[{
FractionBox["\[Omega]FRS",
RowBox[{"{",
RowBox[{"Fin1", ",", "Fin2"}], "}"}]], ",", "\"\<MHz\>\""}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Omega]trans", "=",
RowBox[{"UnitConvert", "[",
RowBox[{
RowBox[{
RowBox[{"N", "@",
FractionBox["c", "Lcav"]}],
RowBox[{"ArcCos", "[",
RowBox[{"1", "-",
FractionBox["Lcav", "R"]}], "]"}]}], ",", "\"\<GHz\>\""}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"\[Omega]FRS", ",",
RowBox[{"{",
RowBox[{"\[Omega]FWHM1", ",", "\[Omega]FWHM2"}], "}"}], ",",
"\[Omega]trans"}], "}"}], "/",
RowBox[{"(",
RowBox[{"2", "Pi"}], ")"}]}]}], "Input",
CellChangeTimes->{{3.702468733968328*^9, 3.7024687703553658`*^9}, {
3.702470214790099*^9, 3.702470271044743*^9}, {3.702470478592338*^9,
3.7024706171216908`*^9}, {3.70247084918188*^9, 3.702471013026802*^9}, {
3.7024710606586637`*^9, 3.702471092491654*^9}, {3.702471398203206*^9,
3.702471550902692*^9}, {3.7024715886038094`*^9, 3.7024719224256697`*^9}, {
3.703395611912692*^9, 3.703395634345209*^9}, {3.703395934165163*^9,
3.7033959810918818`*^9}, {3.70339603265939*^9, 3.703396033481989*^9},
3.718720547081246*^9, {3.718720714094902*^9, 3.718720773104363*^9}, {
3.718720825850629*^9, 3.718720854672513*^9}, {3.718720962516528*^9,
3.7187209976940536`*^9}, {3.7187211398103333`*^9,
3.7187211438569098`*^9}, {3.718721211694172*^9, 3.71872126245856*^9}, {
3.7187213800522757`*^9, 3.718721383059001*^9}, {3.718721460540406*^9,
3.7187215053236017`*^9}, {3.7187215736770782`*^9, 3.7187216624326277`*^9},
3.7187218737566843`*^9, {3.7187219558625937`*^9, 3.718721969688182*^9}, {
3.718722116151198*^9, 3.7187221296099377`*^9}, {3.718724571948118*^9,
3.718724584885729*^9}, 3.737120659866103*^9, 3.737121348673847*^9, {
3.737121562045042*^9, 3.7371215699925423`*^9}, {3.746423638386942*^9,
3.746423683683449*^9}, 3.746423717376574*^9, {3.7464237513782253`*^9,
3.746423781164542*^9}, {3.746426111249486*^9, 3.7464261461531467`*^9}, {
3.746426414387466*^9, 3.7464264187679157`*^9}, {3.746426456012575*^9,
3.746426466055819*^9}, {3.74642654207726*^9, 3.746426560947837*^9}, {
3.746426823161337*^9, 3.746426860045908*^9}, {3.7464269466277733`*^9,
3.746426977470289*^9}, {3.746436059240067*^9, 3.746436071030196*^9}, {
3.746868186115541*^9,
3.7468681864919567`*^9}},ExpressionUUID->"a1ca74fc-f8b3-4039-b6d4-\
a306bd785796"],
Cell[BoxData["117812"], "Output",
CellChangeTimes->{{3.703395612405652*^9, 3.703395634764785*^9},
3.703395983241447*^9, 3.7033960340999947`*^9, 3.713167185973516*^9,
3.713168595337274*^9, {3.7187205391207733`*^9, 3.718720552017561*^9}, {
3.718720718579818*^9, 3.7187207271657543`*^9}, {3.718720757952242*^9,
3.718720775034614*^9}, {3.7187208266117496`*^9, 3.7187208553176403`*^9}, {
3.718720963035757*^9, 3.718720998061191*^9}, {3.718721230391551*^9,
3.718721263092819*^9}, {3.71872147431675*^9, 3.718721506037045*^9}, {
3.718721624254328*^9, 3.718721663093981*^9}, 3.7187218742551394`*^9, {
3.718721956382146*^9, 3.718721970302886*^9}, {3.7187221167053957`*^9,
3.718722130622848*^9}, {3.718724573207786*^9, 3.718724585427535*^9}, {
3.7371206494392233`*^9, 3.7371206603990602`*^9}, 3.737121349305852*^9,
3.7371215733417397`*^9, 3.7464236122479963`*^9, 3.746423684191177*^9, {
3.7464237626064777`*^9, 3.7464237816882544`*^9}, {3.746426112180629*^9,
3.7464261468410883`*^9}, 3.746426428768392*^9, 3.74642646698602*^9, {
3.746426546896644*^9, 3.7464265614021606`*^9}, 3.746426866918573*^9, {
3.746426948799713*^9, 3.746426977965197*^9}, {3.746436062591566*^9,
3.746436071240748*^9}, 3.746438004318267*^9},
CellLabel->
"Out[1372]=",ExpressionUUID->"5b0c8a11-5aca-47d3-9c0c-29f9ac99b2f9"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"100000", ",", "2000000"}], "}"}]], "Output",
CellChangeTimes->{{3.703395612405652*^9, 3.703395634764785*^9},
3.703395983241447*^9, 3.7033960340999947`*^9, 3.713167185973516*^9,
3.713168595337274*^9, {3.7187205391207733`*^9, 3.718720552017561*^9}, {
3.718720718579818*^9, 3.7187207271657543`*^9}, {3.718720757952242*^9,
3.718720775034614*^9}, {3.7187208266117496`*^9, 3.7187208553176403`*^9}, {
3.718720963035757*^9, 3.718720998061191*^9}, {3.718721230391551*^9,
3.718721263092819*^9}, {3.71872147431675*^9, 3.718721506037045*^9}, {
3.718721624254328*^9, 3.718721663093981*^9}, 3.7187218742551394`*^9, {
3.718721956382146*^9, 3.718721970302886*^9}, {3.7187221167053957`*^9,
3.718722130622848*^9}, {3.718724573207786*^9, 3.718724585427535*^9}, {
3.7371206494392233`*^9, 3.7371206603990602`*^9}, 3.737121349305852*^9,
3.7371215733417397`*^9, 3.7464236122479963`*^9, 3.746423684191177*^9, {
3.7464237626064777`*^9, 3.7464237816882544`*^9}, {3.746426112180629*^9,
3.7464261468410883`*^9}, 3.746426428768392*^9, 3.74642646698602*^9, {
3.746426546896644*^9, 3.7464265614021606`*^9}, 3.746426866918573*^9, {
3.746426948799713*^9, 3.746426977965197*^9}, {3.746436062591566*^9,
3.746436071240748*^9}, 3.746438004326934*^9},
CellLabel->
"Out[1373]=",ExpressionUUID->"6c3054d9-e777-4b40-ab62-f9ed734fe829"],
Cell[BoxData[
TemplateBox[{"780.2331488584952`","\"nm\"","nanometers","\"Nanometers\""},
"Quantity"]], "Output",
CellChangeTimes->{{3.703395612405652*^9, 3.703395634764785*^9},
3.703395983241447*^9, 3.7033960340999947`*^9, 3.713167185973516*^9,
3.713168595337274*^9, {3.7187205391207733`*^9, 3.718720552017561*^9}, {
3.718720718579818*^9, 3.7187207271657543`*^9}, {3.718720757952242*^9,
3.718720775034614*^9}, {3.7187208266117496`*^9, 3.7187208553176403`*^9}, {
3.718720963035757*^9, 3.718720998061191*^9}, {3.718721230391551*^9,
3.718721263092819*^9}, {3.71872147431675*^9, 3.718721506037045*^9}, {
3.718721624254328*^9, 3.718721663093981*^9}, 3.7187218742551394`*^9, {
3.718721956382146*^9, 3.718721970302886*^9}, {3.7187221167053957`*^9,
3.718722130622848*^9}, {3.718724573207786*^9, 3.718724585427535*^9}, {
3.7371206494392233`*^9, 3.7371206603990602`*^9}, 3.737121349305852*^9,
3.7371215733417397`*^9, 3.7464236122479963`*^9, 3.746423684191177*^9, {
3.7464237626064777`*^9, 3.7464237816882544`*^9}, {3.746426112180629*^9,
3.7464261468410883`*^9}, 3.746426428768392*^9, 3.74642646698602*^9, {
3.746426546896644*^9, 3.7464265614021606`*^9}, 3.746426866918573*^9, {
3.746426948799713*^9, 3.746426977965197*^9}, {3.746436062591566*^9,
3.746436071240748*^9}, 3.7464380043316717`*^9},
CellLabel->
"Out[1375]=",ExpressionUUID->"e51034dc-23ad-4c7d-9ac9-845449640012"],
Cell[BoxData[
TemplateBox[{"15.757736152661462`","\"microns\"","microns","\"Microns\""},
"Quantity"]], "Output",
CellChangeTimes->{{3.703395612405652*^9, 3.703395634764785*^9},
3.703395983241447*^9, 3.7033960340999947`*^9, 3.713167185973516*^9,
3.713168595337274*^9, {3.7187205391207733`*^9, 3.718720552017561*^9}, {
3.718720718579818*^9, 3.7187207271657543`*^9}, {3.718720757952242*^9,
3.718720775034614*^9}, {3.7187208266117496`*^9, 3.7187208553176403`*^9}, {
3.718720963035757*^9, 3.718720998061191*^9}, {3.718721230391551*^9,
3.718721263092819*^9}, {3.71872147431675*^9, 3.718721506037045*^9}, {
3.718721624254328*^9, 3.718721663093981*^9}, 3.7187218742551394`*^9, {
3.718721956382146*^9, 3.718721970302886*^9}, {3.7187221167053957`*^9,
3.718722130622848*^9}, {3.718724573207786*^9, 3.718724585427535*^9}, {
3.7371206494392233`*^9, 3.7371206603990602`*^9}, 3.737121349305852*^9,
3.7371215733417397`*^9, 3.7464236122479963`*^9, 3.746423684191177*^9, {
3.7464237626064777`*^9, 3.7464237816882544`*^9}, {3.746426112180629*^9,
3.7464261468410883`*^9}, 3.746426428768392*^9, 3.74642646698602*^9, {
3.746426546896644*^9, 3.7464265614021606`*^9}, 3.746426866918573*^9, {
3.746426948799713*^9, 3.746426977965197*^9}, {3.746436062591566*^9,
3.746436071240748*^9}, 3.7464380043367043`*^9},
CellLabel->
"Out[1376]=",ExpressionUUID->"32affd45-b162-4c96-aad4-c3cc4bff7a7d"],
Cell[BoxData[
TemplateBox[{"15601.541732418775`",RowBox[{
SuperscriptBox["\"microns\"", "3"]}],"microns cubed",SuperscriptBox[
"\"Microns\"", "3"]},
"Quantity"]], "Output",
CellChangeTimes->{{3.703395612405652*^9, 3.703395634764785*^9},
3.703395983241447*^9, 3.7033960340999947`*^9, 3.713167185973516*^9,
3.713168595337274*^9, {3.7187205391207733`*^9, 3.718720552017561*^9}, {
3.718720718579818*^9, 3.7187207271657543`*^9}, {3.718720757952242*^9,
3.718720775034614*^9}, {3.7187208266117496`*^9, 3.7187208553176403`*^9}, {
3.718720963035757*^9, 3.718720998061191*^9}, {3.718721230391551*^9,
3.718721263092819*^9}, {3.71872147431675*^9, 3.718721506037045*^9}, {
3.718721624254328*^9, 3.718721663093981*^9}, 3.7187218742551394`*^9, {
3.718721956382146*^9, 3.718721970302886*^9}, {3.7187221167053957`*^9,
3.718722130622848*^9}, {3.718724573207786*^9, 3.718724585427535*^9}, {
3.7371206494392233`*^9, 3.7371206603990602`*^9}, 3.737121349305852*^9,
3.7371215733417397`*^9, 3.7464236122479963`*^9, 3.746423684191177*^9, {
3.7464237626064777`*^9, 3.7464237816882544`*^9}, {3.746426112180629*^9,
3.7464261468410883`*^9}, 3.746426428768392*^9, 3.74642646698602*^9, {
3.746426546896644*^9, 3.7464265614021606`*^9}, 3.746426866918573*^9, {
3.746426948799713*^9, 3.746426977965197*^9}, {3.746436062591566*^9,
3.746436071240748*^9}, 3.7464380043418083`*^9},
CellLabel->
"Out[1377]=",ExpressionUUID->"96bb2ca7-e88f-4cdb-b973-058ed536ce9c"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"3747.405725`","\"GHz\"","gigahertz","\"Gigahertz\""},
"Quantity"], ",",
RowBox[{"{",
RowBox[{
TemplateBox[{"37.47405725`","\"MHz\"","megahertz","\"Megahertz\""},
"Quantity"], ",",
TemplateBox[{"1.8737028625`","\"MHz\"","megahertz","\"Megahertz\""},
"Quantity"]}], "}"}], ",",
TemplateBox[{"47.71663306184072`","\"GHz\"","gigahertz","\"Gigahertz\""},
"Quantity"]}], "}"}]], "Output",
CellChangeTimes->{{3.703395612405652*^9, 3.703395634764785*^9},
3.703395983241447*^9, 3.7033960340999947`*^9, 3.713167185973516*^9,
3.713168595337274*^9, {3.7187205391207733`*^9, 3.718720552017561*^9}, {
3.718720718579818*^9, 3.7187207271657543`*^9}, {3.718720757952242*^9,
3.718720775034614*^9}, {3.7187208266117496`*^9, 3.7187208553176403`*^9}, {
3.718720963035757*^9, 3.718720998061191*^9}, {3.718721230391551*^9,
3.718721263092819*^9}, {3.71872147431675*^9, 3.718721506037045*^9}, {
3.718721624254328*^9, 3.718721663093981*^9}, 3.7187218742551394`*^9, {
3.718721956382146*^9, 3.718721970302886*^9}, {3.7187221167053957`*^9,
3.718722130622848*^9}, {3.718724573207786*^9, 3.718724585427535*^9}, {
3.7371206494392233`*^9, 3.7371206603990602`*^9}, 3.737121349305852*^9,
3.7371215733417397`*^9, 3.7464236122479963`*^9, 3.746423684191177*^9, {
3.7464237626064777`*^9, 3.7464237816882544`*^9}, {3.746426112180629*^9,
3.7464261468410883`*^9}, 3.746426428768392*^9, 3.74642646698602*^9, {
3.746426546896644*^9, 3.7464265614021606`*^9}, 3.746426866918573*^9, {
3.746426948799713*^9, 3.746426977965197*^9}, {3.746436062591566*^9,
3.746436071240748*^9}, 3.7464380043489323`*^9},
CellLabel->
"Out[1381]=",ExpressionUUID->"75841f69-dc03-4526-8d40-8c166e27ce45"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Atom-cavity coupling", "Subsubsection",
CellChangeTimes->{{3.7024715441371193`*^9, 3.702471545741761*^9}, {
3.702471605105187*^9, 3.702471607135982*^9}, {3.702471937146905*^9,
3.702471943881362*^9}, {3.718722160356599*^9, 3.718722163539234*^9}, {
3.718722270442894*^9,
3.718722273622057*^9}},ExpressionUUID->"3fe686f6-808e-45d7-853a-\
4d1d55095bc2"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*",
RowBox[{
RowBox[{"x", "=",
FractionBox["1",
RowBox[{"\[Sqrt]", "6"}]]}], ";"}], " ",
RowBox[{"(*",
RowBox[{
RowBox[{"F", "'"}], "=", "0"}], "*)"}], "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"x", "=",
RowBox[{"\[Sqrt]",
FractionBox["5", "24"]}]}], ";"}],
RowBox[{"(*",
RowBox[{
RowBox[{"F", "'"}], "=",
RowBox[{"1", " ", "on", " ", "D2", " ", "line"}]}], "*)"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{"d", "=",
RowBox[{"Quantity", "[",
RowBox[{
RowBox[{"3.584", "*",
SuperscriptBox["10",
RowBox[{"-", "29"}]]}], ",", "\"\<Coulomb meter\>\""}], "]"}]}],
";"}], " ",
RowBox[{"(*",
RowBox[{"D2", " ", "line"}], "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Mu]", "=",
RowBox[{"x", "*", " ", "d"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"g0", "=",
RowBox[{
RowBox[{"UnitConvert", "[",
RowBox[{
RowBox[{"\[Sqrt]",
RowBox[{"(",
FractionBox[
RowBox[{
SuperscriptBox["\[Mu]", "2"], "\[Omega]cav"}],
RowBox[{"2", "\[HBar]", " ", "\[Epsilon]0", " ", "V"}]], ")"}]}],
" ", ",", "\"\<MHz\>\""}], "]"}], "/",
RowBox[{"(",
RowBox[{"2", "Pi"}], ")"}]}]}]}]}]], "Input",
CellChangeTimes->{{3.702468733968328*^9, 3.7024687703553658`*^9}, {
3.702470214790099*^9, 3.702470271044743*^9}, {3.702470478592338*^9,
3.7024706171216908`*^9}, {3.70247084918188*^9, 3.702471013026802*^9}, {
3.7024710606586637`*^9, 3.702471092491654*^9}, {3.702471398203206*^9,
3.702471550902692*^9}, {3.7024715886038094`*^9, 3.702471808052293*^9}, {
3.7024719479649277`*^9, 3.702471976019856*^9}, {3.702472072992826*^9,
3.702472077656389*^9}, {3.70247234403555*^9, 3.702472418524136*^9}, {
3.7024725447558126`*^9, 3.702472551508287*^9}, {3.702472603851071*^9,
3.7024726122345123`*^9}, {3.7024727576954527`*^9, 3.702472784000341*^9}, {
3.702472820080431*^9, 3.702472856030192*^9}, {3.702477721141308*^9,
3.702477816103939*^9}, {3.7024781333111477`*^9, 3.702478134134061*^9}, {
3.7024782457263517`*^9, 3.702478257806017*^9}, 3.70339558689121*^9, {
3.713168564301607*^9, 3.713168588261014*^9}, {3.7131688081925364`*^9,
3.713168854241336*^9}, {3.7131689347646646`*^9, 3.713168941403632*^9}, {
3.718721752041624*^9, 3.718721762233643*^9}, 3.71872181749406*^9, {
3.718721878737039*^9, 3.718721881735611*^9}},
CellLabel->
"In[1382]:=",ExpressionUUID->"25474bcd-6fe9-48fa-b407-e3b8f7a1feae"],
Cell[BoxData[
TemplateBox[{"23.699784592849177`","\"MHz\"","megahertz","\"Megahertz\""},
"Quantity"]], "Output",
CellChangeTimes->{{3.702471706322822*^9, 3.702471759004574*^9}, {
3.702471969344222*^9, 3.702471976442863*^9}, 3.702472077976262*^9, {
3.7024723948355827`*^9, 3.702472420079341*^9}, {3.702472546490842*^9,
3.7024725520827913`*^9}, 3.70247261282724*^9, {3.702472764968136*^9,
3.702472784561935*^9}, {3.7024728258195543`*^9, 3.702472834047229*^9},
3.7024728913187113`*^9, {3.702477772841805*^9, 3.70247781715585*^9},
3.702478142033523*^9, {3.7024782547041693`*^9, 3.702478258159724*^9},
3.702478363684044*^9, 3.703395593290237*^9, 3.703395985929139*^9,
3.703396045186705*^9, 3.713167187127262*^9, {3.7131685894279213`*^9,
3.7131686003744383`*^9}, {3.713168825352809*^9, 3.713168854605616*^9},
3.71316894221439*^9, 3.7187205555745564`*^9, {3.718720965684629*^9,
3.718720971420486*^9}, 3.718721766337233*^9, 3.718721818187745*^9, {
3.718721876723054*^9, 3.7187218824257603`*^9}, {3.7187219596961803`*^9,
3.718721972165*^9}, 3.718722118708482*^9, {3.737120652852453*^9,
3.7371206628519917`*^9}, 3.737121351410512*^9, 3.7371215781604977`*^9, {
3.746423771293396*^9, 3.746423786839386*^9}, {3.74642611602738*^9,
3.74642613836125*^9}, 3.74642643491479*^9, 3.7464264719345713`*^9, {
3.7464265495494947`*^9, 3.7464265644886923`*^9}, 3.746426950760854*^9,
3.746426981266817*^9, 3.7464360651308937`*^9, 3.746438006161771*^9},
CellLabel->
"Out[1385]=",ExpressionUUID->"e5d85faa-6f54-4ad2-9e01-a8a630f38129"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"\[Gamma]", "=",
RowBox[{"Quantity", "[",
RowBox[{"3", ",", "\"\<MHz\>\""}], "]"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"\[Kappa]1", ",", "\[Kappa]2"}], "}"}], "=",
RowBox[{
FractionBox[
RowBox[{"{",
RowBox[{"\[Omega]FWHM1", ",", "\[Omega]FWHM2"}], "}"}], "2"], "/",
RowBox[{"(",
RowBox[{"2", "Pi"}], ")"}]}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"C1", ",", "C2"}], "}"}], "=",
FractionBox[
RowBox[{"g0", "^", "2"}],
RowBox[{"2",
RowBox[{"{",
RowBox[{"\[Kappa]1", ",", "\[Kappa]2"}], "}"}], " ",
"\[Gamma]"}]]}]}], "Input",
CellChangeTimes->{{3.718722018871706*^9, 3.718722098799983*^9}, {
3.7464238614558983`*^9, 3.7464238755096207`*^9}, {3.746426873644124*^9,
3.746426883001601*^9}, {3.746426921688223*^9, 3.746426933405044*^9}, {
3.746427134945548*^9, 3.746427143248344*^9}},
CellLabel->
"In[1386]:=",ExpressionUUID->"f94c737f-236d-428b-9ec4-430bebc38299"],
Cell[BoxData[
TemplateBox[{"3","\"MHz\"","megahertz","\"Megahertz\""},
"Quantity"]], "Output",
CellChangeTimes->{{3.718722061076015*^9, 3.718722069642356*^9},
3.7187221207442493`*^9, 3.73712135298904*^9, 3.737121583658845*^9,
3.746423876418078*^9, 3.746426888432721*^9, {3.746426934412451*^9,
3.746426982499998*^9}, 3.746427158351358*^9, 3.746438008935878*^9},
CellLabel->
"Out[1386]=",ExpressionUUID->"1320509f-6c0e-4fee-9ab8-d65e415a0bd0"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
TemplateBox[{"18.737028625`","\"MHz\"","megahertz","\"Megahertz\""},
"Quantity"], ",",
TemplateBox[{"0.93685143125`","\"MHz\"","megahertz","\"Megahertz\""},
"Quantity"]}], "}"}]], "Output",
CellChangeTimes->{{3.718722061076015*^9, 3.718722069642356*^9},
3.7187221207442493`*^9, 3.73712135298904*^9, 3.737121583658845*^9,
3.746423876418078*^9, 3.746426888432721*^9, {3.746426934412451*^9,
3.746426982499998*^9}, 3.746427158351358*^9, 3.746438008943924*^9},
CellLabel->
"Out[1387]=",ExpressionUUID->"2b4a4276-eb91-4f75-8b31-f1c3c3e20d67"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"4.996165622885249`", ",", "99.92331245770497`"}], "}"}]], "Output",\
CellChangeTimes->{{3.718722061076015*^9, 3.718722069642356*^9},
3.7187221207442493`*^9, 3.73712135298904*^9, 3.737121583658845*^9,
3.746423876418078*^9, 3.746426888432721*^9, {3.746426934412451*^9,
3.746426982499998*^9}, 3.746427158351358*^9, 3.746438008947891*^9},
CellLabel->
"Out[1388]=",ExpressionUUID->"4e6ca16d-e4fe-46d9-9e78-14184e130342"]
}, Open ]]
}, Open ]]
},
WindowSize->{1204, 763},
WindowMargins->{{Automatic, 0}, {-60, Automatic}},
FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
2018)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 162, 3, 45, "Subsubsection",ExpressionUUID->"c1a95efd-3040-4811-96e4-24fe274612bb"],
Cell[745, 27, 1089, 25, 73, "Input",ExpressionUUID->"fc00ce49-c200-4dc8-b4aa-240d73aa38e1"]
}, Open ]],
Cell[CellGroupData[{
Cell[1871, 57, 214, 4, 45, "Subsubsection",ExpressionUUID->"b47dc4a5-7207-4755-a215-aba5fbb30890"],
Cell[2088, 63, 606, 16, 58, "Text",ExpressionUUID->"7b3a5955-e0da-4ba5-91e2-a504641916e5"],
Cell[CellGroupData[{
Cell[2719, 83, 6150, 166, 491, "Input",ExpressionUUID->"a1ca74fc-f8b3-4039-b6d4-a306bd785796"],
Cell[8872, 251, 1343, 19, 34, "Output",ExpressionUUID->"5b0c8a11-5aca-47d3-9c0c-29f9ac99b2f9"],
Cell[10218, 272, 1394, 21, 34, "Output",ExpressionUUID->"6c3054d9-e777-4b40-ab62-f9ed734fe829"],
Cell[11615, 295, 1427, 21, 36, "Output",ExpressionUUID->"e51034dc-23ad-4c7d-9ac9-845449640012"],
Cell[13045, 318, 1427, 21, 36, "Output",ExpressionUUID->"32affd45-b162-4c96-aad4-c3cc4bff7a7d"],
Cell[14475, 341, 1495, 23, 38, "Output",ExpressionUUID->"96bb2ca7-e88f-4cdb-b973-058ed536ce9c"],
Cell[15973, 366, 1795, 31, 37, "Output",ExpressionUUID->"75841f69-dc03-4526-8d40-8c166e27ce45"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[17817, 403, 366, 6, 45, "Subsubsection",ExpressionUUID->"3fe686f6-808e-45d7-853a-4d1d55095bc2"],
Cell[CellGroupData[{
Cell[18208, 413, 2614, 63, 174, "Input",ExpressionUUID->"25474bcd-6fe9-48fa-b407-e3b8f7a1feae"],
Cell[20825, 478, 1580, 23, 36, "Output",ExpressionUUID->"e5d85faa-6f54-4ad2-9e01-a8a630f38129"]
}, Open ]],
Cell[CellGroupData[{
Cell[22442, 506, 1005, 27, 110, "Input",ExpressionUUID->"f94c737f-236d-428b-9ec4-430bebc38299"],
Cell[23450, 535, 460, 8, 36, "Output",ExpressionUUID->"1320509f-6c0e-4fee-9ab8-d65e415a0bd0"],
Cell[23913, 545, 607, 12, 37, "Output",ExpressionUUID->"2b4a4276-eb91-4f75-8b31-f1c3c3e20d67"],
Cell[24523, 559, 472, 9, 34, "Output",ExpressionUUID->"4e6ca16d-e4fe-46d9-9e78-14184e130342"]
}, Open ]]
}, Open ]]
}
]
*)