FzzXIP25'_[y)  T?33N\@; C\*??{?>uŒ? {B|@AB\*\*BztŽztA I?(o>???>vx? {B|U5%AB; (o\)?BA:a?!k???>x? {B{f~)iAB<# a\)@BՀ b?qN??,?>}? {Bygx+ABSn? {BwlquAB< #\)@B쓀 U`????>? {BthAAB<̿ U`\)@B#g?v??x?>R? {Bqle]`AB<#g\)@B0@ ??-?>|t? {Bm[Q AB=\(\)@Bр@mn???>h|? {BhJClkAB=# \)ABi@/Q?? ?> ? {BcP4AB=8Q\)ABy듀!@A\??.?>w? {B]W7%AB=L̾!ۿ\)A BrF@S9??(`?>? {BV4AB=aG\)A0Bis>@d???>[? {BO|rvAB=u>\)A@B`7b@tgO???>8? {BGAB=b\)APBV^jҳ7@??4?>c? {B?,|AB=\(ҳ7\)A`BKf@{m??fI?>њ? {B6xAB=\)ApB@W@???>? {B,Pj5AB= ӿ\)AB5@B&???>踗? {B"rAB=z\)AB)@/???>? {B0C^AB=Q뾤\)ABK:@Xt??Ru??? {B .AB=[:\)ABgs@??C??? {AߋAB=̾gs\)AB5yk@????q? {A,m-AB= =ykտ\)AA}ˀ]K~@.????y? {A͛dmAB=G]K~\)AAR0@@ʨ??|??? {AA~AB=@ʿ\)AA#'O@j??u??$? {A6TAB=#'O\)AA_O6@%??n ??+x? {Ay$OAB=O6\)AAza"8@??f??3? {A@AB>"8\)AAA#@??^??:? {A7AB> =p\)AA&@??W<??B\? {@HAB>\(&\)A@-@K<??Ox??J!? {?AB>z-\)A?<@5??G7??Qb? { 95#AB><\)Af=K@??@??Y? {W;9AB>Q=KԿ\)A=M@L??8c,??a6m? {2# =M\)BG=<@|a??00??hi? {QK(=<\)BR>@@??)<??p\? {=|AB>.z>@\)Bڿ>+@,??![??w>? {WC=AB>332>+ƿ\)B z>I'@????? {0#>2AB>8Q>I'ǿ\)B[>e|@]??\??v? {PR>AB>=p>e|\)Bx{>C@,?? b+??? {R>AB>B[>C\)B~S>h@'{????? {=>dAB>G>h\)B|>7@=?? c??Jt? {B?%&AB>L>7\)B k>B@y??W??w? {zn?PBAB>Q>B\)B$!H>v]@N??#=??? {%'? AB>W =>v]\)B(-6?>"@B??v??o#? {/D?AB>\(>"\)B,8i>@@Ka??Y??6g? {8ʚ?+AB>aG>@\)B0DM`>@r ????? {A?GAB>fff>ſ\)B4O>߬@o????Q? {Ja?uAB>k>߬\)B8Y]>@_#???? ? {Q@ ^AB>p>\)B<c ]>@N????Lj? {X @{AB>u>񄈿\)B@lV>h@zG>h\)BDtt?KR@*c????? {d@9EAB>?KR\)BH|!?e@5????(? {j@GAB>[?e\)BL?]@_??^??5? {n@TAB>?]\)BP„|??eF??\??? {r@`jAB>?\)BT‡N? T?S????? {u‘@k.JAB>=p? T\)BX‰0? ?F??g??? {xa@sAB>? \)B\‹n? ?Y~??{$??W? {z_V@zAB>\(? Ŀ\)B`Œ?? j??x??u? {{@Y^AB>?\)BdԆ?Bb>b??v)??? {|}@0AB>z?Bb\)BhŽ]?WCϲ??u(??? {|@3AB> =?WC\)BlŽu?ѽ??w d??? {|2@TAB>?\)BpŽ?J9a??z??? {z@|ƇAB>(?J\)BtLn? *W??~??? {yBI@vAB>Q? *W\)BxŒ7? j??R0??8A? {v@nAB>G? \)B|Š`? ӯ??)??Bc? {s@e,AB> ? \)BˆE?h`m????? {pFc@YԈAB>ff?h`\)B…~?dD??,??? {l@MqAB>?d\)B‚ӡ?"??R??8H? {g o@?)AB>?Ŀ\)B>e5:??4??? {aL@0UAB>z>e\)Bw >G????? {[o:@ AB>>\)Bo>zXQ????? {T{@ AB>32>z˿\)Bfö>}i 9????E? {M3@AB>>}\)B]W>ؔy" ????܋? {E$?AB>Q>ؔ\)BSQ)>ϒG????J? {G>ϒ\)BH9>ı$x??v??? {3.?{AB>p>ı$\)B=\>=??\??? {)NE?lOAB>>=\)B2>?J+??ZP??9? {?dAB>[>?J\)B%>NN??ڧ??#? {?66VAB>>\)B>Ő????W? {R? AB>Ǯ>Ő\)B q>\4M?? ??? {(>AB>=p>\\)B@>q????? {ߢ>LAB>>q\)Bp>T$????A? {Ӭ>SLAB>\(>Tտ\)B!>7)????z? {B>9AB>>7)\)Bc>MB??&9|??s`? {2=*>AB>z>MB\)BI=??-??k? {huw=(AB> ==ſ\)Bi=b??5M??dK? {/>ٙ=ɿ\)B0=}q??<??\? {mM;AB>(=}q\)B =/??D??T? {t :A-AB>޸QلLC HomeBpCu#'$x(HHR[ (hh t2 HK'dE6ME HomeBpCu#RV; ;u(?; ?;u??U'b ASystem Center of Mass'un_Mkg??un_Dm??unRtBe.<>un_CA??un_KK??unsmmole??un_Lcd??un_Ts??unFFN??unENJ??unWWW??unCHC??unRs??unVlV??unRV??unHz??unSp?? /s??/sBe.<5m/s^2??m/s??m^2??/m??N/m??kg m^2??N m??kg/m^2?? N m^2/kg^2??''    ''A .@q?'b A'' P!q?'b A''@@q`angle(self.v#)????'b A''!`??`??`??q?'b A'k>L><'eT91exMDTEXTttxt DataexDCeT95exTXMooVTVOD Movie & `(0.0)??`(0.0)??b APointb APointW `Input[8]??@q?6`-(Input[8]) * (Constraint[3].dp.x #- ( 2.0000000e+0))???Vb ASpring>>^ `Input[10]???< >>?8ѷb ACircle@`Mass[4].mass #* Mass[4].a.x#????`Mass[4].mass #* Mass[4].a.y#???? b A Base Pointk(`input[7]*sqr(mass[4].p.x#)*mass[4].p.x#????<A@q?(`input[7]*sqr(mass[4].p.x#)*mass[4].p.x#????b AForce@(`input[7]*sqr(mass[4].p.x#)*mass[4].p.x#????\ABdVG<Pb A+ Spring Constant b (N/m^3)@Input[7]\B7'ŬCdVH<PSb A ' Spring Constant a (N/m)@Input[8] ]nh `t@x\*?-b A Displacement (m)@`time#??? `mass[4].p.x#??? \\*@d3333F<Pb A ' Initial Displacement (m)@ Input[10] ]d`frame? Fs =Bzt? Fext =Žzt?Wext =A I?>b AForces and Work @`frame()??A`-(input[8]*mass[4].p.x#+input[7]*sqr(mass[4].p.x#)*mass[4].p.x#)?????`-output[11].y1*(frame()=0)??Z`(input[8]*sqr(mass[4].p.x#)/2+input[7]*sqr(mass[4].p.x#)*sqr(mass[4].p.x#)/4)*(frame()=0)????? >?> = X->>?8ѷb A Rectangle b AAnchor>>^`mass[4].p.x#+.8??? `mass[4].p.y#???=c:uo>>?8ѷb A Finger Left`(0.0)?? b AAnchorx?'2K   8<= 8< 0I:9". #%%DSIDICT:_cv userdict /_cv known not {userdict /_cv 20 dict put}if _cv begin /bdf{bind def}bind def /isDeviceColor {/currentcolorspace where{pop currentcolorspace 0 get dup /DeviceGray eq exch dup /DeviceRGB eq exch /DeviceCMYK eq or or}{T}ifelse}bdf /setcmykcolor where{/setcmykcolor get /cvcmyk exch def}{/cvcmyk{1 sub 4 1 roll 3{3 index add neg dup 0 lt{pop 0}if 3 1 roll}repeat setrgbcolor pop}bdf }ifelse /stg{isDeviceColor {cf ca /cs load setscreen setgray}{pop}ifelse}bdf /strgb{isDeviceColor {cf ca /cs load setscreen setrgbcolor}{pop pop pop}ifelse}bdf /stcmyk{isDeviceColor {cf ca /cs load setscreen cvcmyk}{pop pop pop pop}ifelse}bdf /min1{dup 0 eq{pop 1}if}bdf currentscreen/cs exch def/ca exch def/cf exch def end ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #d0drw27NO } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #dHHVff ff ff 33 33 33vvmmcc̙ ff!PP"JJ#DD$>>%88&22',,(&&) *+,-./01 2 3 456789:;<=>&&?33@33A<<BCCCJJDQQEXXF``GggHnnIuuJ||KLMNOPQRSTUVssWhhX\\YQQZFF[AA\<<]88^33_33`33a33b33c33defghijkl33m33n33o33pffqffrffsfftffuvwxyz{|}~ffffffff333333333333333333ffffffffffffffffffff33ff33ff3333333333333333??::DD66JJ33PP//UU++``88kkEEvvSS``mm{{İ텅uueeVV3333''''0088@@IIQQZZbbffff{{ְנؐـpp``PP@@0033 0000@@@@PPPP````pppp退ꐐ렠찰ffffffffffffffffff333333333333333333d8<$+ ++ ++ ++ ++ +++ +++ ++++ ++ +++ +++++ ++ ++ +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++    uu)uu$uuu%uu"u%uu$uuu'uu'uuuuuuuuuu%uu&uuu,uu,uu3uu/uuu/uu,u"uu#uuu&uu$uu&uu'uuu&uu#u'uu'uuu,uu'uuuuuuuuuuuu#uuu'uu'uu)uu$uuu#uuuuuuuuuuuuuuuu ddrw2D{2Kb APicture@`and(frame()=0,input[10]<0)?? >>^`mass[4].p.x#-.8??? `mass[4].p.y#???=I9>>?8ѷb A Finger Right{b AAnchorx?'3K   xDH= xDH 0I:9". #%%DSIDICT:_cv userdict /_cv known not {userdict /_cv 20 dict put}if _cv begin /bdf{bind def}bind def /isDeviceColor {/currentcolorspace where{pop currentcolorspace 0 get dup /DeviceGray eq exch dup /DeviceRGB eq exch /DeviceCMYK eq or or}{T}ifelse}bdf /setcmykcolor where{/setcmykcolor get /cvcmyk exch def}{/cvcmyk{1 sub 4 1 roll 3{3 index add neg dup 0 lt{pop 0}if 3 1 roll}repeat setrgbcolor pop}bdf }ifelse /stg{isDeviceColor {cf ca /cs load setscreen setgray}{pop}ifelse}bdf /strgb{isDeviceColor {cf ca /cs load setscreen setrgbcolor}{pop pop pop}ifelse}bdf /stcmyk{isDeviceColor {cf ca /cs load setscreen cvcmyk}{pop pop pop pop}ifelse}bdf /min1{dup 0 eq{pop 1}if}bdf currentscreen/cs exch def/ca exch def/cf exch def end ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #d0drw27^ } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #fHH[bff ff ff 33 33 33vvmmcc̙ ff!PP"JJ#DD$>>%88&22',,(&&) *+,-./01 2 3 456789:;<=>&&?33@33A<<BCCCJJDQQEXXF``GggHnnIuuJ||KLMNOPQRSTUVssWhhX\\YQQZFF[AA\<<]88^33_33`33a33b33c33defghijkl33m33n33o33pffqffrffsfftffuvwxyz{|}~ffffffff333333333333333333ffffffffffffffffffff33ff33ff3333333333333333??::DD66JJ33PP//UU++``88kkEEvvSS``mm{{İ텅uueeVV3333''''0088@@IIQQZZbbffff{{ְנؐـpp``PP@@0033 0000@@@@PPPP````pppp退ꐐ렠찰ffffffffffffffffff333333333333333333fxDH$+ ++ ++ ++ ++ +++ +++ ++++ ++ +++ +++++ ++ ++ +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++   uuu"uu$uuu$uu$uu'uu'uuu&uuuuuuuuuu'uu,uu.uuu-uu-u1uu3uuu0uu#uu'uu'uuu"uuu+uu)uuu)uu*uu-uu.uuu%uuuuuuuuuuuu#uu)uuu(uu%uuu'uuu&uuu uuuuuuuuuuuuuuuu u ddrw2D{3K~b A Picture@`and(frame()=0,input[10]>0)?? yv .2bRelease Objecty>KJb Button 21Y:Z;N (Spring Force) N (External Force) J (Work done on Spring) >kbATextY"ZNon-Hookian Spring bNew Century SchlbkTextx?',,   4 T= 4 T 0I:9"w #%%DSIDICT:_cv userdict /_cv known not {userdict /_cv 20 dict put}if _cv begin /bdf{bind def}bind def /isDeviceColor {/currentcolorspace where{pop currentcolorspace 0 get dup /DeviceGray eq exch dup /DeviceRGB eq exch /DeviceCMYK eq or or}{T}ifelse}bdf /setcmykcolor where{/setcmykcolor get /cvcmyk exch def}{/cvcmyk{1 sub 4 1 roll 3{3 index add neg dup 0 lt{pop 0}if 3 1 roll}repeat setrgbcolor pop}bdf }ifelse /stg{isDeviceColor {cf ca /cs load setscreen setgray}{pop}ifelse}bdf /strgb{isDeviceColor {cf ca /cs load setscreen setrgbcolor}{pop pop pop}ifelse}bdf /stcmyk{isDeviceColor {cf ca /cs load setscreen cvcmyk}{pop pop pop pop}ifelse}bdf /min1{dup 0 eq{pop 1}if}bdf currentscreen/cs exch def/ca exch def/cf exch def end  ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #d0drw27t } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #HHff ff ff 33 33 33vvmmcc̙ ff!PP"JJ#DD$>>%88&22',,(&&) *+,-./01 2 3 456789:;<=>&&?33@33A<<BCCCJJDQQEXXF``GggHnnIuuJ||KLMNOPQRSTUVssWhhX\\YQQZFF[AA\<<]88^33_33`33a33b33c33defghijkl33m33n33o33pffqffrffsfftffuvwxyz{|}~ffffffff333333333333333333ffffffffffffffffffff33ff33ff3333333333333333??::DD66JJ33PP//UU++``88kkEEvvSS``mm{{İ텅uueeVV3333''''0088@@IIQQZZbbffff{{ְנؐـpp``PP@@0033 0000@@@@PPPP````pppp退ꐐ렠찰ffffffffffffffffff3333333333333333334 T$ ddddddddddddddddddddddddddddddddddBddddddddddddddddddddddCdddddddddddddddddddddddFdddddddddddddddddddd;dddddddddddddddddddAdddddddddddddddddddBddddddddddddddddd9dddddddddddddd7dddddddddddddddddddd dd ddddrw2D{SKb APictureY.Z9Dr. Richard Vawter Western Washington University 10/20/97_b AText