ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/nonperiodicVSS/friction.nb
(Generate patch)

Comparing trunk/nonperiodicVSS/friction.nb (file contents):
Revision 3972 by kstocke1, Fri Sep 6 13:09:47 2013 UTC vs.
Revision 3973 by kstocke1, Thu Oct 31 20:43:00 2013 UTC

# Line 10 | Line 10 | NotebookDataLength[     16589,        465]
10   NotebookFileLineBreakTest
11   NotebookFileLineBreakTest
12   NotebookDataPosition[       157,          7]
13 < NotebookDataLength[     16589,        465]
14 < NotebookOptionsPosition[     14982,        408]
15 < NotebookOutlinePosition[     15336,        424]
16 < CellTagsIndexPosition[     15293,        421]
13 > NotebookDataLength[     19104,        539]
14 > NotebookOptionsPosition[     17047,        466]
15 > NotebookOutlinePosition[     17401,        482]
16 > CellTagsIndexPosition[     17358,        479]
17   WindowFrame->Normal*)
18  
19   (* Beginning of Notebook Content *)
# Line 91 | Line 91 | Cell[BoxData["4.905911087845821`*^-28"], "Output",
91   CellChangeTimes->{3.5848955833332977`*^9, 3.584895910460045*^9,
92    3.586699817892194*^9, 3.586704684940571*^9, 3.586704772274445*^9,
93    3.586704844305737*^9, 3.586705113459869*^9, 3.586706480803813*^9,
94 <  3.5873020194381523`*^9}]
94 >  3.5873020194381523`*^9, 3.592229882745839*^9}]
95   }, Open  ]],
96  
97   Cell[BoxData[
# Line 157 | Line 157 | Cell[BoxData["3.286335727454394`*^-29"], "Output",
157     3.584894209263301*^9, 3.5848944220659027`*^9, 3.584894562584774*^9,
158     3.5848956426941223`*^9, 3.584895912816411*^9, 3.586699824159266*^9,
159     3.586704688787434*^9, 3.5867047762806807`*^9, 3.58670484784446*^9,
160 <   3.586705115994009*^9, 3.586706483628399*^9, 3.587302022625839*^9}]
160 >   3.586705115994009*^9, 3.586706483628399*^9, 3.587302022625839*^9, {
161 >   3.592229884604623*^9, 3.592229886190812*^9}}]
162   }, Open  ]],
163  
164   Cell[BoxData[
# Line 216 | Line 217 | Cell[BoxData["8.228464473085094`*^-29"], "Output",
217     3.584894423252715*^9, 3.584894734499061*^9, 3.58489564491859*^9,
218     3.584895914221643*^9, 3.5866998271353817`*^9, 3.586704693130818*^9,
219     3.586704778769905*^9, 3.586704850366987*^9, 3.586705118085232*^9,
220 <   3.586706485967189*^9, 3.587302024980714*^9}]
220 >   3.586706485967189*^9, 3.587302024980714*^9, 3.592229888275922*^9}]
221   }, Open  ]],
222  
223   Cell[BoxData["\[IndentingNewLine]"], "Input",
# Line 310 | Line 311 | Cell[BoxData["0.7687260259259584`"], "Output",
311     3.5848950094024963`*^9}, 3.584895649579417*^9, 3.5848960393110647`*^9,
312     3.586699830645979*^9, 3.5867046965751457`*^9, 3.58670478211369*^9,
313     3.58670485421113*^9, 3.586705120876774*^9, 3.586706489578327*^9,
314 <   3.587302029126953*^9}]
314 >   3.587302029126953*^9, 3.592229891604624*^9, 3.592230285429771*^9}]
315   }, Open  ]],
316  
317   Cell[BoxData[
# Line 357 | Line 358 | Cell[BoxData["1.924768288590935`"], "Output",
358     3.5848950109231567`*^9, 3.584895650617403*^9, 3.584896040714982*^9,
359     3.5866998334559813`*^9, 3.586704697863037*^9, 3.5867047835855827`*^9,
360     3.586704856869244*^9, 3.586705122378854*^9, 3.5867064906482763`*^9,
361 <   3.587302031033265*^9}]
361 >   3.587302031033265*^9, 3.5922298926407747`*^9, 3.592230287769177*^9}]
362   }, Open  ]],
363  
364   Cell[BoxData[
# Line 380 | Line 381 | Cell[BoxData["3.2863357274544055`*^-29"], "Output",
381    3.58489400012298*^9, 3.584895019483296*^9, 3.584895652455336*^9,
382    3.584896042503642*^9, 3.586699834607826*^9, 3.586704699166651*^9,
383    3.586704785006289*^9, 3.586704858291555*^9, 3.5867051235852127`*^9,
384 <  3.586706492338463*^9, 3.5873020329225597`*^9}]
384 >  3.586706492338463*^9, 3.5873020329225597`*^9, 3.5922298941614933`*^9,
385 >  3.592230289358754*^9}]
386   }, Open  ]],
387  
388   Cell[BoxData[
# Line 403 | Line 405 | Cell[BoxData["8.228464473085123`*^-29"], "Output",
405    3.584894001208784*^9, 3.584895020435354*^9, 3.584895653375164*^9,
406    3.58489604404213*^9, 3.5866998356785097`*^9, 3.586704701890503*^9,
407    3.5867047871298437`*^9, 3.586704859378227*^9, 3.586705125437768*^9,
408 <  3.586706494141871*^9, 3.587302037451337*^9}]
408 >  3.586706494141871*^9, 3.587302037451337*^9, 3.592229895414654*^9,
409 >  3.5922301525824823`*^9, 3.592230291731276*^9}]
410 > }, Open  ]],
411 >
412 > Cell[CellGroupData[{
413 >
414 > Cell[BoxData[
415 > RowBox[{"sphere20", " ", "=", " ",
416 >  RowBox[{"8.", "*", "Pi", "*", "eta", "*",
417 >   RowBox[{"(",
418 >    RowBox[{"0.000000002", "^", "3"}], ")"}]}]}]], "Input",
419 > CellChangeTimes->{{3.59222982607369*^9, 3.592229856411433*^9}, {
420 >  3.5922299746610317`*^9, 3.592229974997485*^9}, {3.592230008276516*^9,
421 >  3.592230018198002*^9}}],
422 >
423 > Cell[BoxData["6.132388859807276`*^-29"], "Output",
424 > CellChangeTimes->{{3.592229849445587*^9, 3.5922298567993317`*^9},
425 >   3.592229896417653*^9, {3.592230012116171*^9, 3.592230019100162*^9},
426 >   3.59223015505754*^9, 3.592230292819572*^9}]
427 > }, Open  ]],
428 >
429 > Cell[CellGroupData[{
430 >
431 > Cell[BoxData[
432 > RowBox[{"sphere30", " ", "=", " ",
433 >  RowBox[{"8.", "*", "Pi", "*", "eta", "*",
434 >   RowBox[{"(",
435 >    RowBox[{"0.000000003", "^", "3"}], ")"}]}]}]], "Input",
436 > CellChangeTimes->{{3.5922300231785307`*^9, 3.592230041833757*^9}}],
437 >
438 > Cell[BoxData["2.0696812401849554`*^-28"], "Output",
439 > CellChangeTimes->{{3.5922300382599373`*^9, 3.592230042239984*^9},
440 >   3.592230155927438*^9, 3.592230293654245*^9}]
441 > }, Open  ]],
442 >
443 > Cell[CellGroupData[{
444 >
445 > Cell[BoxData[
446 > RowBox[{"sphere40", " ", "=", " ",
447 >  RowBox[{"8.", "*", "Pi", "*", "eta", "*",
448 >   RowBox[{"(",
449 >    RowBox[{"0.000000004", "^", "3"}], ")"}]}]}]], "Input",
450 > CellChangeTimes->{{3.592230072390108*^9, 3.592230087171822*^9}}],
451 >
452 > Cell[BoxData["4.905911087845821`*^-28"], "Output",
453 > CellChangeTimes->{3.5922300877395563`*^9, 3.592230156546358*^9,
454 >  3.592230294507525*^9}]
455 > }, Open  ]],
456 >
457 > Cell[CellGroupData[{
458 >
459 > Cell[BoxData["eqSphere"], "Input",
460 > CellChangeTimes->{{3.592230118312943*^9, 3.5922301195153713`*^9}}],
461 >
462 > Cell[BoxData["4.275041583893163`*^-29"], "Output",
463 > CellChangeTimes->{3.592230120102518*^9, 3.592230158066312*^9,
464 >  3.592230295963499*^9}]
465   }, Open  ]]
466   },
467   WindowSize->{740, 876},
# Line 428 | Line 486 | Cell[3154, 89, 281, 4, 30, "Output"]
486   Cell[2739, 75, 164, 3, 27, "Input"],
487   Cell[CellGroupData[{
488   Cell[2928, 82, 223, 5, 27, "Input"],
489 < Cell[3154, 89, 281, 4, 30, "Output"]
490 < }, Open  ]],
491 < Cell[3450, 96, 335, 11, 27, "Input"],
492 < Cell[3788, 109, 318, 6, 27, "Input"],
493 < Cell[4109, 117, 524, 17, 43, "Input"],
489 > Cell[3154, 89, 303, 4, 30, "Output"]
490 > }, Open  ]],
491 > Cell[3472, 96, 335, 11, 27, "Input"],
492 > Cell[3810, 109, 318, 6, 27, "Input"],
493 > Cell[4131, 117, 524, 17, 43, "Input"],
494   Cell[CellGroupData[{
495 < Cell[4658, 138, 568, 10, 27, "Input"],
496 < Cell[5229, 150, 636, 9, 30, "Output"]
495 > Cell[4680, 138, 568, 10, 27, "Input"],
496 > Cell[5251, 150, 686, 10, 30, "Output"]
497   }, Open  ]],
498 < Cell[5880, 162, 343, 7, 43, "Input"],
499 < Cell[6226, 171, 717, 22, 43, "Input"],
498 > Cell[5952, 163, 343, 7, 43, "Input"],
499 > Cell[6298, 172, 717, 22, 43, "Input"],
500   Cell[CellGroupData[{
501 < Cell[6968, 197, 540, 10, 27, "Input"],
502 < Cell[7511, 209, 621, 9, 30, "Output"]
501 > Cell[7040, 198, 540, 10, 27, "Input"],
502 > Cell[7583, 210, 643, 9, 30, "Output"]
503   }, Open  ]],
504 < Cell[8147, 221, 109, 1, 43, "Input"],
505 < Cell[8259, 224, 284, 6, 43, "Input"],
506 < Cell[8546, 232, 1342, 37, 88, "Input"],
507 < Cell[9891, 271, 94, 1, 27, "Input"],
508 < Cell[9988, 274, 311, 6, 27, "Input"],
504 > Cell[8241, 222, 109, 1, 43, "Input"],
505 > Cell[8353, 225, 284, 6, 43, "Input"],
506 > Cell[8640, 233, 1342, 37, 88, "Input"],
507 > Cell[9985, 272, 94, 1, 27, "Input"],
508 > Cell[10082, 275, 311, 6, 27, "Input"],
509   Cell[CellGroupData[{
510 < Cell[10324, 284, 615, 17, 27, "Input"],
511 < Cell[10942, 303, 587, 9, 27, "Output"]
510 > Cell[10418, 285, 615, 17, 27, "Input"],
511 > Cell[11036, 304, 631, 9, 27, "Output"]
512   }, Open  ]],
513 < Cell[11544, 315, 364, 7, 43, "Input"],
513 > Cell[11682, 316, 364, 7, 43, "Input"],
514   Cell[CellGroupData[{
515 < Cell[11933, 326, 782, 23, 27, "Input"],
516 < Cell[12718, 351, 526, 8, 27, "Output"]
515 > Cell[12071, 327, 782, 23, 27, "Input"],
516 > Cell[12856, 352, 572, 8, 27, "Output"]
517   }, Open  ]],
518 < Cell[13259, 362, 289, 6, 43, "Input"],
518 > Cell[13443, 363, 289, 6, 43, "Input"],
519   Cell[CellGroupData[{
520 < Cell[13573, 372, 169, 3, 27, "Input"],
521 < Cell[13745, 377, 374, 5, 30, "Output"]
520 > Cell[13757, 373, 169, 3, 27, "Input"],
521 > Cell[13929, 378, 423, 6, 30, "Output"]
522   }, Open  ]],
523 < Cell[14134, 385, 264, 6, 27, "Input"],
523 > Cell[14367, 387, 264, 6, 27, "Input"],
524   Cell[CellGroupData[{
525 < Cell[14423, 395, 169, 3, 27, "Input"],
526 < Cell[14595, 400, 371, 5, 30, "Output"]
525 > Cell[14656, 397, 169, 3, 27, "Input"],
526 > Cell[14828, 402, 442, 6, 30, "Output"]
527 > }, Open  ]],
528 > Cell[CellGroupData[{
529 > Cell[15307, 413, 337, 7, 27, "Input"],
530 > Cell[15647, 422, 237, 3, 30, "Output"]
531 > }, Open  ]],
532 > Cell[CellGroupData[{
533 > Cell[15921, 430, 240, 5, 27, "Input"],
534 > Cell[16164, 437, 167, 2, 30, "Output"]
535 > }, Open  ]],
536 > Cell[CellGroupData[{
537 > Cell[16368, 444, 238, 5, 27, "Input"],
538 > Cell[16609, 451, 141, 2, 30, "Output"]
539 > }, Open  ]],
540 > Cell[CellGroupData[{
541 > Cell[16787, 458, 102, 1, 27, "Input"],
542 > Cell[16892, 461, 139, 2, 30, "Output"]
543   }, Open  ]]
544   }
545   ]

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines