FzzXIP25'_[o)  T?PNHomeBpC|'$xHH(FG(HH(d'`HomeBpCG@RV< =<# (<# < ?=??U'b ASystem Center of Mass'un_Mkg??un_Dm??unRtrad??un_CA??un_KK??unsmmole??un_Lcd??un_Ts??unFFN??unENJ??unWWW??unCHC??unRs??unVlV??unRV??unHz??unSp?? /s??rad/s??m/s^2??m/s??m^2??N/m??kg m^2??J??kg/m s??'' ''A.q?'`- self.mass #* ( 9.8000002e+0)???b A'' P!q?'b A''@@q`angle(self.v#)????'b A''!`??`??`??q?'b A'ATk>L>>'eT91exMDTEXTttxt DataexDCeT95exTXMooVTVOD Movie &>L>L^ `Input[11]?? `Input[14]?? `Input[15]??;>>?8ѷb ACircle b APoint@b APointW `Input[9]??@q?6`-(Input[9]) * (Constraint[3].dp.x #- ( 2.0000000e+0))???kb ASpring ]u%-` Az ME =@A KE =@AATPEs =>AkPEg =?BA6 bA  Energy of Bob@`time#???)`output[8].y1+output[10].y1+output[12].y1??(`0.5 * mass[1].mass #* sqr( mass[1].v #)????`.5*input[9]*sqr(mass[1].p.y#)???*`-constraintforce(10002,1).y#*mass[1].p.y#????  \ABHkJ<Pxb A " Spring Constant k (N/m)@Input[9] \>Lȿ?G<Px/b A # Initial Position of Bob@ Input[11] Y"Z'ENERGY of an OSCILLATING SPRING BOBXbNew Century SchlbkText\@ A F<Pxb A# Initial Velocity (m/s)@ Input[14]\?8ѷ@(P<Pyb A Bob's Mass (kg)@ Input[15]]Dd`frame?ME@?bATime@`frame()??)`output[8].y1+output[10].y1+output[12].y1?? ]Dd`frame?KE@?bA Time@`frame()??(`0.5 * mass[1].mass #* sqr( mass[1].v #)???? ]Dd`frame?PEs>?bA Time@`frame()??`.5*input[9]*sqr(mass[1].p.y#)??? ]Dd`frame?PEg?B?bATime@`frame()??*`-constraintforce(10002,1).y#*mass[1].p.y#????x?'    (tD (t 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 #d1drw2u } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2: @@@@,  Geneva-1iso  8.@@@@(`Jddrw2:ddrw2D{ ;b APicturex?'    $D $ 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 #d1drw2vak} ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2:@@@@,  Geneva-1iso  8.@@@@(Jddrw2:ddrw2D{ 9b APicturex?'    \D \ 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 r ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #d1drw2lWar} ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2:r@@@@,  Geneva-1iso  8.@@@@(]Jddrw2:ddrw2D{ 9b APicturex?'    4\D 4\ 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 #d1drw2bMuW } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2: @@@@,  Geneva-1iso  8.@@@@(5Jddrw2:ddrw2D{ 8b APicturex?'z   dcN d 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 #zHHd@00000000ff 0ff 0ff 033 033 033000vvmmcc0f 0f!PP"JJ#DD$>>%88&22',,(&&) *+,-./01 2 3 456789:;<=>&&?#33@#33A<<BCCCJJDQQEXXF``GggHnnIuuJ||KLMNO:P:QRSTUVssWhhX\\YQQZFF[AA\<<]88^33_30h`30ha30hb30hc30hdoeofogohoiojokol3pm3pn3po3ppfsqfsrfssfstfsuzvzwzxzyz{|}~ffff̠ff̠ff30̲3330̲3330̲3330̷3030ffffffffff30f30f303303303303??::DD66JJ33PP//UU++``88kkEEvvSS``mm{{İ텅uueeVV33''''0088@@IIQQZZbb0,ff0,ff{{ְנؐـpp``PP@@0030ho 0000@@@@PPPP````pppp退ꐐ렠찰Z0ԙԙԙԙf ffff ffff fff303333033330333zd$.dddddppppp..:ddddpppppp......8ddddpppppp......9dddddddpppppp......@ ddddddddpppdd......dd>dddddppdd.....dd=dddddddpppdd...dddAddddddppppppd.....dWdddddddppppppdd........dddLddddddppppppdd......ddHdddddpppppdd....dd........ .  pp pppppppppppppp pppp ppppppppppppppppppppppp,pppppppppppppppp1pppppppppppppppppp-ppppppppppppppppp.ppppppppppppppp"ppppppppppp*ppppppppppppppp$pppppppppppppp)pppppppppppppppppppppppp ppppppppppppppppppp.. .............. .... ....................................-..................+..................%..............(......................&.............#............(.................................... ............. %0181:3- ddrw2D{zVb APicturey> 9bButton 6y>Sb Button 21Y.Z9Dr. Richard Vawter Western Washington University 10/20/97_b AText]Dd`frame?PEs>?W!bATime@`frame()??`.5*input[9]*sqr(mass[1].p.y#)??? x?'    4\D 4\ 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 #d1drw2bMuW } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2: @@@@,  Geneva-1iso  8.@@@@(5Jddrw2:ddrw2D{ 9mb APicturex?'    (tD (t 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 #d1drw2u } ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2: @@@@,  Geneva-1iso  8.@@@@(`Jddrw2:ddrw2D{ lkb APicturex?'    $D $ 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 #d1drw2vak} ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2:@@@@,  Geneva-1iso  8.@@@@(Jddrw2:ddrw2D{ [kb APicturex?'    \D \ 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 r ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse #d1drw2lWar} ##:1 userdict /_cv known {_cv begin stg end}{pop}ifelse # ddrw2:ddrw2:$d4drw2:r@@@@,  Geneva-1iso  8.@@@@(]Jddrw2:ddrw2D{ Kkb APicture]Dd`frame?PEg?B?g!bATime@`frame()??*`-constraintforce(10002,1).y#*mass[1].p.y#????]Dd`frame?ME@?4"bATime@`frame()??)`output[8].y1+output[10].y1+output[12].y1?? ]Dd`frame?KE@?F#bATime@`frame()??(`0.5 * mass[1].mass #* sqr( mass[1].v #)????]d`frame?time = ?_bATime@`frame()??`time#???