-
Notifications
You must be signed in to change notification settings - Fork 6
Expand file tree
/
Copy pathMETADATA
More file actions
executable file
·2299 lines (2264 loc) · 96 KB
/
METADATA
File metadata and controls
executable file
·2299 lines (2264 loc) · 96 KB
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
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
# generate this sort of template with:
# ~/bin/mtcheck ../mathematica/phy454/continuumL21Figures.cdf | tee x ; # say
my @mathematicaUndescribed =
(
{
DATE => 'Nov 6, 2020',
path => 'GAelectrodynamics/grid3D.nb',
WHAT => qq()
},
{
DATE => 'Nov 6, 2020',
path => 'GAelectrodynamics/stickfig3D.nb',
WHAT => qq()
},
{
DATE => 'Nov 6, 2020',
path => 'GAelectrodynamics/HatchShadingQuestionGraphics3D.nb',
WHAT => qq()
},
{
DATE => 'Nov 6, 2020',
path => 'GAelectrodynamics/graphics3DstackQuestion.nb',
WHAT => qq()
},
{
DATE => 'Feb 21, 2012',
path => 'classicalmechanics/psIIp4InfPlanePot.cdf',
WHAT => qq()
},
{
DATE => 'Feb 21, 2012',
path => 'classicalmechanics/psIIp4InfPlanePotTakeII.cdf',
WHAT => qq()
},
{
DATE => 'May 28, 2012',
path => 'phy454/continuumL21Figures.cdf',
WHAT => qq()
},
{
DATE => 'Dec 8, 2013',
path => 'twitterTips/evenMoreTwitterTips.cdf',
WHAT => qq(evenMoreTwitterTips)
},
{
DATE => 'Dec 8, 2013',
path => 'tapwater/imageProcessingExperimentation.cdf',
WHAT => qq(imageProcessingExperimentation)
},
{
DATE => 'Dec 8, 2013',
path => 'tapwater/streamSlowCurveFit.cdf',
WHAT => qq(streamSlowCurveFit)
},
{
DATE => 'Dec 9, 2013',
path => 'misc/gatest.nb',
WHAT => qq(gatest)
},
{
DATE => 'Dec 9, 2013',
path => 'misc/landauPeriodIntegral.nb',
WHAT => qq(landauPeriodIntegral)
},
{
DATE => 'Dec 9, 2013',
path => 'misc/packageTest.nb',
WHAT => qq(packageTest)
},
{
DATE => 'Dec 9, 2013',
path => 'misc/pendulumPhaseSpaceFigure.nb',
WHAT => qq(pendulumPhaseSpaceFigure)
},
{
DATE => 'Dec 9, 2013',
path => 'misc/piArcTanExpansion.nb',
WHAT => qq(piArcTanExpansion)
},
{
DATE => 'Dec 9, 2013',
path => 'misc/problemSet6problem2PlotAttempts.nb',
WHAT => qq(problemSet6problem2PlotAttempts),
PROBLEMSET => 1,
},
{
DATE => 'Dec 9, 2013',
path => 'misc/tensorContractionExperiment.nb',
WHAT => qq(tensorContractionExperiment)
},
{
DATE => 'Jan 2, 2014',
path => 'module/testplot.nb',
WHAT => qq(testplot)
},
{
DATE => 'Apr 1, 2015',
path => 'ece1229/ps4/p4cutAndPasteForSubmission.nb',
WHAT => qq(p4cutAndPasteForSubmission)
},
{
DATE => 'Jun 13, 2023',
path => 'blogit/triangleInscribedCircle.nb',
WHAT => qq(triangleInscribedCircle)
},
{
DATE => 'Sep 18, 2023',
path => 'blogit/wedgeSolutions.nb',
WHAT => qq(wedgeSolutions)
},
{
DATE => 'Mar 31, 2024',
path => 'blogit/triangle.nb',
WHAT => qq(triangle)
},
{
DATE => 'Jul 14, 2023',
path => 'blogit/circlesOnCircles.nb',
WHAT => qq(circlesOnCircles)
},
{
DATE => 'Sep 5, 2023',
path => 'blogit/unitSphere.nb',
WHAT => qq(unitSphere)
},
{
DATE => 'Jun 11, 2023',
path => 'blogit/triangleInscribedCircleOrig.nb',
WHAT => qq(triangleInscribedCircleOrig)
},
{
DATE => 'Sep 27, 2023',
path => 'blogit/squareInCircleFig1.nb',
WHAT => qq(squareInCircleFig1)
},
{
DATE => 'Sep 11, 2023',
path => 'blogit/ellipseEarthAnimation.nb',
WHAT => qq(ellipseEarthAnimation)
},
{
DATE => 'Dec 25, 2022',
path => 'blogit/triangleInscribedInCircleProblem.nb',
WHAT => qq(triangleInscribedInCircleProblem)
},
{
DATE => 'Feb 28, 2024',
path => 'blogit/dotmetric.nb',
WHAT => qq(dotmetric)
},
{
DATE => 'Nov 3, 2023',
path => 'blogit/tangentLineAndPlane.nb',
WHAT => qq(tangentLineAndPlane)
},
) ;
sub mathematicaMeta
{
my @mathematica =
(
{
DATE => 'Sep 23, 2023',
path => 'GAelectrodynamics/ga30_wedge_solution.nb',
WHAT => qq(Wedge product solution and approximate solutions. Also includes figures.)
},
{
DATE => 'Aug 31, 2023',
path => 'GAelectrodynamics/greensFunctionContoursFigure.nb',
WHAT => qq(Plot the contour for evaluting the Harmonic Oscillator Green's function.)
},
{
DATE => 'Dec 15, 2023',
path => 'GAelectrodynamics/curlFigures.nb',
WHAT => qq(Figures for curl of vector fields.)
},
{
DATE => 'Aug 30, 2023',
path => 'GAelectrodynamics/parallelogramAreaFigure.nb',
WHAT => qq(Area of a parallelogram, illustrating the rejection component.)
},
{
DATE => 'Jan 3, 2023',
path => 'GAelectrodynamics/problem.1.3.nb',
WHAT => qq(Notebook with solution of a Pauli matrix problem.)
},
{
DATE => 'Dec 10, 2023',
path => 'GAelectrodynamics/sphericalPolarConventionsPlot.nb',
WHAT => qq(Plot the physics (not math) conventions for spherical polar coordinates, and show the orientation of the bivector designated j. Also plot the unit basis vectors.)
},
{
DATE => 'Feb 12, 2023',
path => 'GAelectrodynamics/twoForceProblemWithWeightFigure.nb',
WHAT => qq(Figures and calculations for some statics problems.)
},
{
DATE => 'Nov 6, 2011',
path => 'financial/ibm_stock_plot.cdf',
WHAT => qq(Plotting last couple weeks of IBM stock history.)
},
{
DATE => 'Mar 11, 2011',
path => 'misc/FailedRealSimplify.nb',
WHAT => qq(tried to find real parts and had trouble.)
},
{
DATE => 'Mar 12, 2011',
path => 'misc/FailedRealSimplify2.nb',
WHAT => qq(Same thing, simplified for stackoverflow question.)
},
{
DATE => 'Mar 12, 2011',
path => 'misc/SphericalCurlAttempt.nb',
WHAT => qq(Trying to do some spherical polar calculations. Gave up and did them by hand.)
},
{
DATE => 'Mar 23, 2011',
path => 'misc/phy450ps5rough.nb',
WHAT => qq(Generate figures for an electrodynamics problem set submission.)
},
# trash:
{
DATE => 'Mar 11, 2011',
path => 'misc/plot3dAttempt.nb',
WHAT => qq(An early plot attempt.)
},
{
DATE => 'Mar 10, 2011',
path => 'misc/simple-1.nb',
WHAT => qq(Some very first basic attempts to use mathematica. Integrate and Plot and matrix syntax.)
},
{
DATE => 'Apr 21, 2011',
path => 'misc/minorTrigIntegrals.nb',
WHAT => qq(Integrate and TrigReduce)
},
{
DATE => 'Apr 25, 2011',
path => 'papers/obliqueReciprocal.nb',
WHAT => qq(Generate figures for arxiv 1104.4829 paper.)
},
{
DATE => 'Apr 21, 2011',
path => 'phy356/deltaFunctionPlots.nb',
WHAT => qq(Generate figures for square well and delta function well for phy356 notes..)
},
{
DATE => 'Apr 21, 2011',
path => 'phy450/dipolePlot.nb',
WHAT => qq(plot of dipole moment)
},
{
DATE => 'Apr 21, 2011',
path => 'phy450/ps5IntegralTakeII.nb',
WHAT => qq(Integrate x sin(a - |x|)/|x|)
},
{
DATE => 'Sep 15, 2011',
path => 'misc/DiracGammaMatrix.nb',
WHAT => qq(Some gamma matrix calculations.)
},
{
DATE => 'Sep 15, 2011',
path => 'misc/eigenvectors_of_a_cross_product_matrix.nb',
WHAT => qq(Probably messing around with a Lorentz force problem.)
},
{
DATE => 'Sep 15, 2011',
path => 'gabook/matrixVectorPotentialsTrig.nb',
WHAT => qq(Some trig double angle reductions.)
},
{
DATE => 'Sep 15, 2011',
path => 'gabook/pendulumDouble.nb',
WHAT => qq(Generate some double pendulum figures.)
},
{
DATE => 'Sep 15, 2011',
path => 'phy456/desai_S_24_2_1_verify.nb',
WHAT => qq(Some integrals related to QM hydrogen atom energy expectation values.)
},
{
DATE => 'Sep 24, 2011',
path => 'phy456/ps2_p2_verify_normalization.nb',
WHAT => qq(Some trig integrals that I didn't feel like doing manually.)
},
{
DATE => 'Sep 28, 2011',
path => 'phy456/problem_set_3_integrals.nb',
WHAT => qq(Some Gaussian integrals.)
},
{
DATE => 'Sep 24, 2011',
path => 'phy456/exponential_integrals.nb',
WHAT => qq(More Gaussian integrals and some that Mathematica didn't know how to do.)
},
{
DATE => 'Oct 2, 2011',
path => 'phy456/24.4.3_attempt_with_mathematica.nb',
WHAT => qq(Some variational method calculations for QM energy estimation.)
},
{
DATE => 'Oct 5, 2011',
path => 'phy456/gaussian_fitting_for_abs_function.nb',
WHAT => qq(Hankle function fitting for e^{-b|x|} and related plots.)
},
{
DATE => 'Oct 8, 2011',
path => 'phy456/qmTwoL8figures.nb',
WHAT => qq(Plot of Gaussian weighted cosine, its Fourier transform, and figure for perturbation of Harmonic oscillator system.)
},
{
DATE => 'Oct 9, 2011',
path => 'phy456/qmTwoL9figures.nb',
WHAT => qq(Sinusoid plot turned on at t_0 and ongoing from there.)
},
{
DATE => 'Oct 6, 2011',
path => 'phy456/stackoverflow_expNth_unknown.nb',
WHAT => qq(Stripped down example notebook for stackoverflow question about Derivative[2] not behaving well.)
},
{
DATE => 'Oct 6, 2011',
path => 'phy456/stackoverflow_question_about_listable.nb',
WHAT => qq(Stripped down example notebook for stackoverflow question about Listable attribute defaults.)
},
{
DATE => 'Oct 16, 2011',
path => 'phy456/desai_attempt_to_verify_section_16.3.nb',
WHAT => qq(Some energy expectation value calculations.)
},
{
DATE => 'Oct 15, 2011',
path => 'phy456/desai_24_4_4.nb',
WHAT => qq(Another worked variational method problem.)
},
{
DATE => 'Oct 15, 2011',
path => 'phy456/desai_24_4_5.nb',
WHAT => qq(Another worked variational method problem.)
},
{
DATE => 'Oct 15, 2011',
path => 'phy456/desai_24_4_6.nb',
WHAT => qq(Another worked variational method problem. Looks like I've learned about the /. operator for evaluating variables with values.)
},
{
DATE => 'Oct 10, 2011',
path => 'phy456/problem_set_4,_problem_2.nb',
WHAT => qq(Some trig integrals that Mathematica didn't evaluate correctly. Don't trust a tool without thinking whether the results are good!)
},
{
DATE => 'Oct 15, 2011',
path => 'phy456/qmTwoL10figures.nb',
WHAT => qq(Some sinc function plots. Learned how to use Manipulate to make sliders.)
},
{
DATE => 'Oct 26, 2011',
path => 'misc/desai_24.4.1_wkb_harmonic_oscillator.nb',
WHAT => qq(A square root quadratic integral.)
},
{
DATE => 'Oct 28, 2011',
path => 'misc/qmTwoR3figures.nb',
WHAT => qq(Figure for square well with Perturbing potential in the well, and for degeneracy splitting.)
},
{
DATE => 'Oct 31, 2011',
path => 'phy456/plot_question.nb',
WHAT => qq(Another stackoverflow mathematica question. Why no output in my plot. Learned about Mathematica local and global variables as a result.)
},
{
DATE => 'Oct 18, 2011',
path => 'phy456/problem_set_5_integrals.nb',
WHAT => qq(Some integrals of first order linear polynomials.)
},
{
DATE => 'Oct 17, 2011',
path => 'phy456/qmTwoL11figures.nb',
WHAT => qq(Some vector addition and function translation figures.)
},
{
DATE => 'Oct 19, 2011',
path => 'phy456/qmTwoL12_figures.nb',
WHAT => qq(Some step and rect function plots.)
},
{
DATE => 'Oct 14, 2011',
path => 'misc/wolfram_twitter_tips.nb',
WHAT => qq(Take the wolfram twitter tip feed and try out some of the interesting recent ones.)
},
{
DATE => 'Oct 31, 2011',
path => 'phy456/ps7_rotation_matrix_orthonormal.nb',
WHAT => qq(A sanity check on a rotation matrix calculated as part of a problem set.)
},
{
DATE => 'Dec 17, 2011',
path => 'phy456/qmTwoExamReflection.cdf',
WHAT => qq(Exam problem 2a. Calculate the matrix of a Perturbation Hamiltonian \$-\\boldsymbol{\\mu}_d \\cdot \\mathbf{E}\$ with respect to the \$n=2\$ hydrogen atom wave functions.)
},
{
DATE => 'Dec 12, 2011',
path => 'misc/sincSquaredEvaluation.nb',
WHAT => qq(A SinIntegral plot and sinc integration with use of Limit[])
},
{
DATE => 'Jan 17, 2012',
path => 'phy454/strainTensorCylindrical.cdf',
WHAT => qq(Compute the cylindrical strain tensor components to second order.
Using the notation package for the first time to get results that make the mathematica notebook text intelligible as well as the final result.
Also use the Collect[] function for the first time to group the results according to the differential products of interest.)
},
{
DATE => 'Jan 21, 2012',
path => 'phy454/strainTensorSpherical.cdf',
WHAT => qq(Like strainTensorCylindrical but for spherical coordinates.
Here I used Coefficient instead of Collect so that I could factor out the additional portions of the area element differentials for constancy and comparison with the Landau and Lifshitz equation.)
},
{
DATE => 'Jan 17, 2012',
path => 'phy454/strainTensorSphericalColumnVectors.cdf',
WHAT => qq@
Same as strainTensorSpherical, but I didn't pre-compute the line element differentials myself, instead letting mathematica do the grunt work.
Note that in this version, I specified the definitions of rcap, thetacap, and phicap manually, but had some commented out code to verify that I had this right.
This notebook was left using Collect instead of coefficient, so the collected factors do not match the text equation results without additional manual comparison work.
Also use this to output the column matrices for rcap, thetacap and phicap and drcap/dt.
@
},
{
DATE => 'Feb 3, 2012',
path => 'phy454/continuumProblemSet1Q1.cdf',
WHAT => qq(PHY454. Problem set 1.
Final grunt calculation.
Mathematica features used: 3x3 matrix, IdentityMatrix, Tr (trace), MatrixForm, evaluate last expression.)
},
{
DATE => 'Dec 21, 2011',
path => 'misc/moreTwitterTips.cdf',
WHAT => qq()
},
{
DATE => 'Feb 4, 2012',
path => 'phy454/continuumProblemSet1Q2.cdf',
WHAT => qq(PHY454 Problem set 1. Q2.
Confirm the characteristic equation calculated manually.
Find the root, by solving the characteristic equation.
Find the eigenvalues and normalized eigenvectors.
Interesting mathematica functions used: Map which applies operation to list, Normalize, Solve, Table, Total -- adding all elements in a list.)
},
{
DATE => 'Feb 5, 2012',
path => 'phy454/continuumProblemSet1Q3.cdf',
WHAT => qq(PHY454 Problem set 1. Q3.
Confirm some manual matrix calculations.
Used Cross product function, and Orthogonalize for Gram-Schmidt like expansion.)
},
{
DATE => 'Feb 8, 2012',
HEIGHT => 2500,
path => 'phy454/continuumProblemSet1Q2animated.cdf',
WHAT => qq@PHY454 Problem set 1. Q2.
Animate the stress tensor associated with the problem, for different points and values of Poisson's ratio.
This generalizes the solution of the problem since answers visually whether the point is under expansion (blue arrow) or under compression (red arrow) at each point in space.
Mathematica manipulate sliders are used to select the spatial points and the value of Poisson's ratio.
Used a number of new (for me) mathematica features: Table, Arrow, If, Part, multiple colors in Graphics3D, DiagonalMatrix, Diagonal (select diagonal into list), Tr (not Trace!), Map, Eigenvalues, Eigenvectors, and in a later version Eigensystem to replace the last two.
The code has links to various stackexchange questions for this notebook. There's an answer on scaling that's incorporated into the Graphics3D options. One more mathematica stackexchange question answered on this little notebook which motivated the Dynamic and DynamicModule calls now here, and one more that drove the change to use Eigensystem.
@
},
{
DATE => 'Feb 12, 2012',
path => 'phy454/partErrorTestStandalone2D.cdf',
WHAT => qq(Based on phy454continuumProblemSet1Q2animated.cdf, with most stuff stripped out to ask about the errors on initial load in mathematica.stackexchange question.),
},
{
DATE => 'Feb 19, 2012',
path => 'classicalmechanics/infiniteCylinderPotential.cdf',
WHAT => qq(Attempt at evaluating the potential for an infinite cylinder.)
},
{
DATE => 'Feb 24, 2012',
path => 'classicalmechanics/psIIp4InfPlanePotTakeIII.cdf',
WHAT => qq(Attempt at evaluating the potential for an infinite plane. Experimenting with using mathematica to produce decent documents, as well as trying a variation of the previous calculation where I used \$R^2 \\sim e\$.
The final output is not as nice as latex, but the save as latex option seems promising. New Mathematica tools used in this notebook include HoldForm, TraditionalForm, and ReleaseHold, which can be used to generate traditional form by default for scratch display generation.
Note that cut-and-pasting URLS in comments as I've been doing get mangled and can't be followed. Switched the ones in this doc to Insert->Hyperlink instead.)
},
{
DATE => 'Feb 27, 2012',
path => 'classicalmechanics/psIIp4InfCylPot.cdf',
WHAT => qq(Attempt evaluation of a cylindrical potential.
New Mathematica methods used: HoldForm, Assuming, Assumptions.)
},
{
DATE => 'Mar 3, 2012',
path => 'phy454/twoLayerInclinedFlowDifferentDensities.cdf',
WHAT => qq(Plug in some numbers for the viscosities and densities for the inclined fluid flow down a plane problem. Insertion of an air layer above the water ends up with the air speed humongous! Steady state not realistic? What are the length scales required for steady state?
New mathematica functions used: WolframAlpha, ChemicalData.)
},
{
DATE => 'Mar 4, 2012',
path => 'phy454/twoLayerInclinedFlowDifferentDensitiesTheCalculation.cdf',
WHAT => qq(Redo the hand calculation in twoLayerInclinedFlowDifferentDensities.tex completely in mathematica and verify the results. I did it right.
Notable mathematica functions used: Do, Solve, Collect, ExpandAll.)
},
{
DATE => 'Mar 13, 2012',
path => 'phy454/continuumProblemSet2Fig1r2.cdf',
WHAT => qq(
Generate figures for continuum mechanics problem set II figure 1. Using Show and ParametericPlot for the first time. First version used Wacom tablet and graphics drawing options to put in arrows. Text labels later added with Inkscape latex-pdf. Later version used Array of Arrows to draw vector field. Looks much better.)
},
{
DATE => 'Mar 14, 2012',
path => 'phy454/continuumProblemSet2Fig3.cdf',
WHAT => qq(Figure3 for continuum mechanics problem set II. Used ChemicalData again and used Piecewise.)
},
{
DATE => 'Mar 14, 2012',
path => 'phy454/problemSetIIQ3exactSolution.cdf',
WHAT => qq(Exact solution to Q3 velocities. Return to this and plot it later.)
},
{
DATE => 'Mar 16, 2012',
path => 'phy454/continuumL17Figures.cdf',
WHAT => qq(erf Plot. Using AxesLabel)
},
{
DATE => 'Mar 22, 2012',
path => 'phy454/problemSetIIQ3PlotWithManipulate.cdf',
WHAT => qq(Plotting the two layer constant pressure gradient solution.)
},
{
DATE => 'Mar 29, 2012',
path => 'phy454/continuumL20Figures.cdf',
WHAT => qq(Generate figures for lecture 20 notes.)
},
{
DATE => 'Mar 31, 2012',
path => 'phy454/channelFlowWithStepPressureGradient.cdf',
WHAT => qq(Animation for the time evolution of a channel flow due to constant pressure gradient turned on at an initial time for fluid at rest before that.)
},
{
DATE => 'Apr 4, 2012',
path => 'phy454/continuumL22Figures.cdf',
WHAT => qq(Figure for last lecture. Defined a rectGraphic function, just to create a drawing area. Toss that in a mathematica module file to learn how to make one.)
},
{
DATE => 'Apr 11, 2012',
path => 'phy454/couetteFlow.cdf',
WHAT => qq(Plot the Couette flow solutions. This is by far my coolest attempt to use Mathematica to do visualization so far. The velocity field is plotted in the appropriate circular contours, albeit without arrows and without an envelope with the contours of the field profile. New tricks learned for this notebook include the use of Slider, Dynamic, and RadioButtonBar. Row and Column were used to group the sliders and labels and resulting plots. I coded up a really cool viscosity and density selector too, but that did not get used here so I commented it out and disabled the initialization cell that I had put in for the ChemicalData lookup. Things were also coded in a nice clean fashion so that I could use one helper function to generate both the Manipulate like controls and also the table that I used to save an animation for my pdf file with the original calculations.)
},
{
DATE => 'Apr 14, 2012',
path => 'phy454/twoCylinders.cdf',
WHAT => qq(Plot the flow between two infinite cylinders. Mathematica coding style is getting nicer. This has no prologue attempting to be self contained with a nice text description ... too much work to do that in Mathematica instead of Latex. Used Manipulate to generate an animation that includes the sliders. Tried embedding this in the associated pdf, but ffmpeg cant handle it, and I do not know how to coerce it to do so.)
},
{
DATE => 'Apr 15, 2012',
path => 'phy454/twoCylinders3D.cdf',
WHAT => qq(Take the previous calculation and display and do it in 3D instead. Very cool.)
},
{
DATE => 'Apr 15, 2012',
path => 'phy454/demoTemplateTwoCylinders3D.nb',
WHAT => qq(Add some explanatory text, and put in the format required for the wolfram demo upload page.)
},
{
DATE => 'Apr 20, 2012',
path => 'misc/aurorasPlotPlay.cdf',
WHAT => qq(Play around with sliders and 2D locator controls, doing something like what Aurora did in class automatically for larger numbers of lines.)
},
{
DATE => 'Apr 25, 2012',
path => 'phy454/bottomlessCoffee.cdf',
WHAT => qq(Plot the Bessel function fitting for the spin down of a bottomless coffee cup. Also animate the time evolution of the spin down with a Manipulate slider. As mentioned in the text, this does not match reality too well.)
},
{
DATE => 'Apr 25, 2012',
path => 'phy454/continuumFluidsReview.cdf',
WHAT => qq(The integral for chapter 7, problem 2 of Landau's fluids. Curve for a fluid meniscus up a wall.)
},
{
DATE => 'Apr 27, 2012',
path => 'phy454/coffeeCupWithBottom.cdf',
WHAT => qq(Solving the PDE for the non-bottomless coffee cup problem. Find Bessel functions of order 1. Find the fitting coefficients for stirring above the bottom, in the layer of fluid lower than the stirring. Plot this function, and verify against boundary condition.)
},
{
DATE => 'Apr 19, 2012',
path => 'misc/fragment.cdf',
WHAT => qq(Experimenting with Function and HoldFirst. Can use that instead of HoldForm for just one arg, and then do not need a ReleaseHold.)
},
{
DATE => 'May 3, 2012',
path => 'misc/BesselJIntegrals.cdf',
WHAT => qq(Some symbolic Bessel integrals over zeros.)
},
{
DATE => 'May 4, 2012',
path => 'misc/hyperbolicSineFourier.cdf',
WHAT => qq(Construct the sinh function using Fourier series and plot it with a Manipulate on the number of terms.)
},
{
DATE => 'Aug 5, 2012',
path => 'phy485/modernOpticsProblemCh2Pr6Plots.cdf',
WHAT => qq(Plots for problem 2.6 in Fowles Modern Optics.)
},
{
DATE => 'Aug 9, 2012',
path => 'phy485/ellipticalPolarizationRotationToStdForm.cdf',
WHAT => qq(Problem 2.9 in Fowles Modern Optics. General Jones vector)
},
{
DATE => 'Oct 4, 2012',
path => 'phy485/modernOpticsProblemSet1.cdf',
WHAT => qq(Problem set 1 numerical and plot stuff.)
},
{
DATE => 'Oct 17, 2012',
path => 'phy485/diffractionBesselFunctionTransformPair.cdf',
WHAT => qq(Attempt to verify the circular aperture Fourier transform result from the diffraction notes. Mathematica gives me a different result than what our Prof detailed.)
},
{
DATE => 'Oct 22, 2012',
path => 'phy485/modernOpticsProblemSet2work.cdf',
WHAT => qq(Problem set 2 work. Verify some results. Do the plots and numerical work. This includes the integral that yields the first order Bessel function.)
},
{
DATE => 'Oct 24, 2012',
path => 'phy485/randomVariate.cdf',
WHAT => qq(Thinking about problem set 2 problem 3b. Logical want to consider the solar originated rays as random variates in the lingo of mathematica ... functions that generate frequencies or frequency ranges as opposed to the probability that a frequency is found in a certain range.)
},
{
DATE => 'Oct 30, 2012',
path => 'phy485/gaussianScalingVerification.cdf',
WHAT => qq(Determine the scaling and variance for a Gaussian)
},
{
DATE => 'Oct 30, 2012',
path => 'phy485/etalon.cdf',
WHAT => qq(Plot the Etalon function. Used Evaluate and the PlotLegends package to label the level curves automatically)
},
{
DATE => 'Nov 01, 2012',
path => 'phy485/lecture14figures.cdf',
WHAT => qq(Plots for lecture 14. One is a simple sine squared (using Ticks to mark only on 2 Pi multiples), and the other I was experimenting with Mathematica Text label placement.)
},
{
DATE => 'Nov 06, 2012',
path => 'phy485/etalonFancyLabellingApp.cdf',
WHAT => qq(Try out Belisaris's label placement "App" for the Etalon figure.)
},
{
DATE => 'Nov 06, 2012',
path => 'phy485/etalonFancyLabellingResult.cdf',
WHAT => qq(Results from Belisaris's label placement "App" for the Etalon figure.)
},
{
DATE => 'Nov 08, 2012',
path => 'phy485/lecture15figures.nb',
WHAT => qq(Plot the single slit diffraction wavefunction and N slit intensity, the latter using a Manipulate so that various parameters can be played with)
},
{
DATE => 'Nov 08, 2012',
path => 'phy485/problemSet3.nb',
WHAT => qq(Plots and rough calculations for problem set 3)
},
{
DATE => 'Nov 20, 2012',
path => 'phy485/lecture18figures1DQuantumSHO.nb',
WHAT => qq(Plots for lecture 18. First couple 1D Quantum SHO solutions)
},
{
DATE => 'Dec 1, 2012',
path => 'phy485/lecture20figures.nb',
WHAT => qq(Plots for lecture 20.)
},
{
DATE => 'Dec 1, 2012',
path => 'phy485/gaussianBeamHandoutNotes.nb',
WHAT => qq(Plot of the lowest order Gaussian beam envelope. Verify normalization from page 2 of the notes. Use ContourPlot3D to plot the hyperboliod of revolution for the lowest order Gaussian beam mode.)
},
{
DATE => 'Dec 4, 2012',
path => 'phy485/fowles1028signError.nb',
WHAT => qq(Verify sign error in the characteristic poly in Fowles just before 10.28. Functions used: Collect, Solve. Also sets up a 2 by 2 matrix.)
},
# lost?
#{
# DATE => 'Dec 4, 2012',
# path => 'phy485/problemSet4problem2c.nb',
# WHAT => qq(Compute characteristic equation coefficients for unequal focal radii. Functions used: Det, CoefficientList, Factor, FullSimplify.)
#},
{
DATE => 'Nov 6, 2012',
path => 'phy485/etalonAngularFancyLabellingApp.nb',
WHAT => qq(likely using Belisaris's labeling app)
},
{
DATE => 'Nov 21, 2012',
path => 'phy485/negativeExponentialPlot.nb',
WHAT => qq(Plot of decreasing exponential)
},
{
DATE => 'Dec 7, 2012',
path => 'phy485/midtermReflectionAbsSincPlot.nb',
WHAT => qq(Plot of Abs[Sinc[]] for Lloyd's mirror problem post midterm reflection)
},
{
DATE => 'Dec 10, 2012',
path => 'phy485/2010finalQuestion3BesselIntegral.nb',
WHAT => qq(Bessel integral for 2010 question 3 exam practice)
},
{
DATE => 'Dec 11, 2012',
path => 'phy485/2010finalQuestion5numericalEvaluation.nb',
WHAT => qq(Numerical evaluation for 2010 question 5a and 5b exam practice. Used the new Mathematica 9 Quantity function for easy handling of units. Provides a nice check that the right numerical combinations end up dimensionless.)
},
{
DATE => 'Dec 15, 2012',
path => 'phy485/vanDrielz0z1z2stabilityAlgebra.nb',
WHAT => qq(Here's the algebra for the Van Driel notes that give expressions for z1 z2 z0 in terms of g1 g2, and for w(z) at these points. Too hard to do it by hand. Mathematica functions used include Notation package for subscript variables, Flatten, Solve, Eliminate, FullSimplify, and Factor.)
},
{
DATE => 'Dec 25, 2012',
path => 'phy452/atleeJackson1_13.nb',
WHAT => qq()
},
{
DATE => 'Jan 1, 2013',
path => 'phy452/kittelCh2Fig1App.nb',
WHAT => qq(Use the labeling app for a figure)
},
{
DATE => 'Jan 1, 2013',
path => 'phy452/kittelCh2Fig1.nb',
WHAT => qq(Output of kittelCh2Fig1App.nb)
},
{
DATE => 'Jan 10, 2013',
path => 'phy452/lecture2Figures.nb',
WHAT => qq(Plots for lecture 2)
},
{
DATE => 'Jan 10, 2013',
path => 'phy452/lecture2Fig7.nb',
WHAT => qq(Generated notebook for plot for lecture 2, figure 7)
},
{
DATE => 'Jan 13, 2013',
path => 'phy452/normalizationCentralLimitTheoremVsBinomialLimitCheck.nb',
WHAT => qq(Check normalization of central limit theorem binomial fair coin result vs result given in class ... these are off by a factor of two)
},
{
DATE => 'Jan 19, 2013',
path => 'phy452/attemptAtProblemSet2Problem1iiIntegrals.nb',
WHAT => qq(Plots and integrals for problem set II.)
},
#{
# DATE => 'Jan 19, 2013',
# path => 'phy452/attemptAtProblemSet2Problem1iiIntegralsLabelAppGenerated.nb',
# WHAT => qq(Labeling app generated notebook)
#},
{
DATE => 'Jan 30, 2013',
path => 'phy452/statMechProblemSet3.nb',
WHAT => qq(problem set 3 calculations and figures)
},
{
DATE => 'Feb 2, 2013',
path => 'phy452/shoPhaseSpacePlots.nb',
WHAT => qq(SHO elliptic plot. Have a Manipulate driven illustration of Liouville's theorem, showing the trajectory of an area in the phase space, allowing observation of the area invariance as it distorts around the path.)
},
{
DATE => 'Feb 6, 2013',
path => 'phy452/binomialPlotsExactAndApprox.nb',
WHAT => qq(Plot of unfair coin binomial and the Gaussian approximation.)
},
{
DATE => 'Feb 10, 2013',
path => 'phy452/kittelCh3Problem1Plots.nb',
WHAT => qq(Plots for chapter 3, problem 1. Used the new mathematica 9 PlotLegends, a bit better than the version 8 implementation, and now built in.)
},
{
DATE => 'Feb 10, 2013',
path => 'phy452/cyclindrialMomenta.nb',
WHAT => qq(Jacobian transformation, for the change of vars for the volume element from Cartesian cylindrical coordinates.)
},
{
DATE => 'Feb 11, 2013',
path => 'phy452/nVolumeTrickToCalculateAreaOfCircle.nb',
WHAT => qq(integration of \$x^2 + y^2\$ over a circular quadrant. Used as an example in the easy way hyper volume discussion)
},
{
DATE => 'Feb 11, 2013',
path => 'phy452/sphericalPhaseSpaceChangeOfVars.nb',
WHAT => qq(Jacobian calculation for phase space change of vars, Cartesian to spherical. Also verifies the hand calculations for the momenta in spherical coordinates)
},
{
DATE => 'Feb 13, 2013',
path => 'phy452/midtermQ4twoEqualMassesCollision.nb',
WHAT => qq(verify the collision of two equal masses statement made in class. Particles swap velocities. The other solution is that the final velocities equal the initial.)
},
{
DATE => 'Feb 23, 2013',
path => 'phy452/problemSet4Problem2c.nb',
WHAT => qq(Problem set 4 stuff)
},
{
DATE => 'Feb 23, 2013',
path => 'phy452/problemSet4Problem1.nb',
WHAT => qq(Problem set 4 stuff)
},
{
DATE => 'Feb 28, 2013',
path => 'phy452/kittelRotationalPartition.nb',
WHAT => qq(Kittel problem 3.6 plots)
},
{
DATE => 'March 6, 2013',
path => 'phy452/problemSet5Plots.nb',
WHAT => qq(plots and rough calculations for problem set 5)
},
{
DATE => 'March 6, 2013',
path => 'phy452/problemSet5Problem3partD.nb',
WHAT => qq(plots and rough calculations for problem set 5)
},
{
DATE => 'March 10, 2013',
path => 'phy452/midtermTwoQ1FinalSimplificationMu.nb',
WHAT => qq(Expand and simplify some hyperbolic products. This took a bit of coercion, surprising for a simple expression. To do the simplification, I had to use all of TrigToExp, Expand, Simplify, Numerator, Denominator, ExpandAll, ExpToTrig),
},
{
DATE => 'March 10, 2013',
path => 'misc/increasingTheMathematicaOutputSizeByAlteringScreenResolution.nb',
WHAT => qq(Increase the default display size for fonts for input and output to something readable! http://mathematica.stackexchange.com/q/745),
},
{
DATE => 'March 13, 2013',
path => 'phy452/pathria_3_30.nb',
WHAT => qq(Plot and messy algebra bits for Pathria problem 3.30),
},
{
DATE => 'March 19, 2013',
path => 'phy452/crudeAttemptsToPlotFermiOccupancy.nb',
WHAT => qq(Try to Plot the Fermi occupancy. This doesn't behave well numerically at low temperatures),
},
{
DATE => 'March 21, 2013',
path => 'phy452/kittelZipper.nb',
WHAT => qq(Kittel zipper problem and plot. Found how to use Placed PlotLegends with {Left, Top} instead of Left, to get the legend into the figure for use in Save As.),
},
{
DATE => 'March 25, 2013',
path => 'phy452/lecture16DensityPlot.nb',
WHAT => qq(Plot the period boundary conditions density. Used Mathematica Map, pure functions, Placed PlotLegends, ToString, Text, text concatonation operator),
},
{
DATE => 'March 27, 2013',
path => 'phy452/largeTemperatureGaussianFermionDistributionIntegral.nb',
WHAT => qq(Lecture 16, Integral verification for thermal de Broglie lambda calculation.),
},
{
DATE => 'March 28, 2013',
path => 'phy456/24.4.3.newAttempt.nb',
WHAT => qq(A new attempt at Desai 24.4.3 from scratch. This one has an error, as did the original. The original is now fixed.),
},
{
DATE => 'March 30, 2013',
path => 'phy452/basicStatMechProblemSet6Problem2.nb',
WHAT => qq(Some rough calculations and plots that were discarded for ps6 p2. Mathematica functions of interest: Map, Evaluate, Flatten, pure functions, Assumptions),
},
{
DATE => 'April 1, 2013',
path => 'phy452/basicStatMechProblemSet6Problem3.nb',
WHAT => qq(Numerical calculation for Nucleon energy),
},
{
DATE => 'April 2, 2013',
path => 'phy452/lecture20PlotAndIntegral.nb',
WHAT => qq(Boltzmann indefinite integral),
},
{
DATE => 'April 3, 2013',
path => 'phy452/basicStatMechProblemSet7.nb',
WHAT => qq(problem 1 Plots for occupation number averages. Another use of pure functions and Map, for both the set of functions to Plot and for the Text of the Placed PlotLegends. Problem 2 numerical calculations for Bose condensation temperatures.),
},
{
DATE => 'April 4, 2013',
path => 'phy452/lecture21Plot.nb',
WHAT => qq(figure 2 plot),
},
{
DATE => 'April 4, 2013',
path => 'phy452/huang93relativisiticGas.nb',
WHAT => qq(Lots of stuff, calculations and plots, for Huang 9.3 problem: relativistic gas),
},
{
DATE => 'April 17, 2013',
path => 'phy452/negativeBinomial.nb',
WHAT => qq(Verify definition of negative integer binomial coefficient for an exponent value of -2. Used pattern matching /. for the first time in this notebook),
},
{
DATE => 'April 28, 2013',
path => 'phy452/einsteinFunctionAndLowTempApproxPlot.nb',
WHAT => qq(Plot Einstein function and approx from Pathria equation 7.3.10),
},
{
DATE => 'April 28, 2013',
path => 'phy452/pathriaIntegralsFor7_4_phononDriftVelocity.nb',
WHAT => qq(Pathria 7.4 integrals for calculation of mean phonon drift velocity),
},
{
DATE => 'April 28, 2013',
path => 'phy452/stirlingError.nb',
WHAT => qq(Plots showing the relative error of a Stirling approximation),
},
{
DATE => 'April 30, 2013',
path => 'phy452/spinZeroBoseCondensation.nb',
WHAT => qq(Plot for spinZeroBoseCondensation.tex, final exam reflection, problem 2)
},
{
DATE => 'Sept 19, 2013',
path => 'phy487/qmSolidsPs1P2.nb',
WHAT => qq(Hybrid orbital plots),
PROBLEMSET => 1,
},
{
DATE => 'Sept 19, 2013',
path => 'phy487/qmSolidsPs1P3b.nb',
WHAT => qq(Madelung constant calculations for NaCl),
PROBLEMSET => 1,
},
{
DATE => 'Sept 24, 2013',
path => 'phy487/problemSet2Problem3Visualization.nb',
WHAT => qq(Visualize the Bravais lattice given),
PROBLEMSET => 1,
},
{
DATE => 'Sept 25, 2013',
path => 'phy487/meltingPointVsZplots.nb',
WHAT => qq(Plots of melting points in Kelvin vs Z)
},
{
DATE => 'Sept 29, 2013',
path => 'phy487/qmSolidsPs3P1.nb',
WHAT => qq(Reciprocal vector calculation from measurements),
PROBLEMSET => 1,
},
{
DATE => 'Oct 10, 2013',
path => 'phy487/IbachAndLuth4_15_verify.nb',
WHAT => qq(Verify equation 4.15 of the text, for the frequencies of the diatomic linear chain)
},
{
DATE => 'Oct 10, 2013',
path => 'phy487/qmSolidsPs4P2d.nb',
WHAT => qq(Plots of 1D two spring constant lattice frequency distributions),
PROBLEMSET => 1,
},
{
DATE => 'Oct 9, 2013',
path => 'phy487/qmSolidsPs4P2dGenerated.nb',
WHAT => qq(Labeled plots of 1D two spring constant lattice frequency distributions. This is a generated notebook.),
PROBLEMSET => 1,
},
{
DATE => 'Oct 10, 2013',
path => 'phy487/qmSolidsPs4P2cAnimation.nb',
WHAT => qq(Dynamic animation of two atom harmonic oscillation),
PROBLEMSET => 1,
},