{VERSION 6 0 "IBM INTEL LINUX" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {PARA 0 "" 0 "" {TEXT -1 0 "" }{TEXT -1 36 "self_loaded_brass_ bar.mws 4/20/2006" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 92 "restar t:\nc:=rho*g/YM/II;\nc1:=-c*L;\nc2:=c*L^2/2;\ny:=simplify(c*x^4/24 + c 1*x^3/6 + c2*x^2/2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"cG**%$rhoG \"\"\"%\"gGF'%#YMG!\"\"%#IIGF*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#c 1G,$*,%$rhoG\"\"\"%\"gGF(%#YMG!\"\"%#IIGF+%\"LGF(F+" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%#c2G,$*.\"\"#!\"\"%$rhoG\"\"\"%\"gGF*%#YMGF(%#IIGF( %\"LGF'F*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"yG,$*0\"#C!\"\"%$rhoG \"\"\"%\"gGF*%\"xG\"\"#,(*$)F,F-F*F**(\"\"%F*%\"LGF*F,F*F(*&\"\"'F*)F3 F-F*F*F*%#YMGF(%#IIGF(F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 161 "g:=9.8;\nYM:=9.0e10;\nsigma:=8750;\nw:=2.5/100;\nh:=0.44/100;\nA: =w*h;\nrho:=sigma*A;\nL:=124.0/100;\nII:=int(int(x1^2,x2=-w/2..w/2),x1 =-h/2..h/2);\nfr:=YM*II;\nevalf(y);\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gG$\"#)*!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#YMG$\"#!*\" \"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&sigmaG\"%]()" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"wG$\"+++++D!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"hG$\"+++++W!#7" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"+ ++++6!#8" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$rhoG$\"++++D'*!#5" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG$\"++++S7!\"*" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%#IIG$\"+nmmu" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>%#frG$\"+++?(f\"!\")" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*($\"+5kog C!#6\"\"\")%\"xG\"\"#F(,(*$F)F(F(*&$\"++++g\\!\"*F(F*F(!\"\"$\"+++gD#* F1F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot(-y,x=0..L, scaling=constrained);\ny_at_L:=eval(y,x=L);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 140 "plot(diff(-y,x),x=0..L,title=\"slope\");\nplot(diff( -y,x,x),x=0..L,title=\"2nd derivative\");\nplot(diff(-y,x,x,x),x=0..L, title=\"3rd derivative\");" }}{PARA 13 "" 1 "" {GLPLOT2D 744 164 164 {PLOTDATA 2 "6&-%'CURVESG6$7S7$$\"\"!F)$!\"!F)7$$\"3\\mmm;r%Gq#!#>$!3 \"RTOjc\\Wj\"!#@7$$\"3[LL$3%*zX0&F/$!3HtW%4z**Qk&F27$$\"3;nmmh%\\$*p(F /$!3=BQXE@*3H\"!#?7$$\"3ymm;B];O5!#=$!3snI')R&eVI#F=7$$\"3RLL3b(H6I\"F A$!3f&R?]-,9e$F=7$$\"3jmmTzfyY:FA$!3C.b9VC!Q*\\F=7$$\"3&)***\\2x[6!=FA $!3lD+Y7INxmF=7$$\"3dmmTL6@k?FA$!3yttZ+U8W')F=7$$\"3$)***\\<&)HkK#FA$! 3r4msJ))=#3\"F/7$$\"3OLLLMS:'f#FA$!3uxfd6boF8F/7$$\"3Tmm;TssLGFA$!3B'* )>4)41h:F/7$$\"3.+++.%y65$FA$!3Xxb-\"3+?%=F/7$$\"3;+++XxspLFA$!3Y1ac6* pC9#F/7$$\"33+++(zC&GOFA$!3o@wkbMZ[CF/7$$\"3tmmT8t`jQFA$!3#R?k-Ci&RFF/ 7$$\"3jLLLE**)H9%FA$!3#*e^OM96,JF/7$$\"3hLLLXHszVFA$!3OoTTeet>MF/7$$\" 3y***\\Zs*4bYFA$!3zKmFmSs.QF/7$$\"3wKLLN[&))*[FA$!3h^(z_$y&[:%F/7$$\"3 i++vCGHm^FA$!3b0\">ZsU9b%F/7$$\"3?++DMq&4U&FA$!3[+wp(fr$R\\F/7$$\"38ML $3Usmo&FA$!3)3AO,#*pSN&F/7$$\"3sLL3$4#oIfFA$!3m>y@#Q)=VdF/7$$\"3'fmm\" *[zQ>'FA$!3e%4VZ$)R6<'F/7$$\"3AmmT8wEnkFA$!3*)Q7G>l*Ri'F/7$$\"3T***\\# zFD0nFA$!3HfbYI4cCqF/7$$\"3fmm;yKGipFA$!3D2&oS\"=EjuF/7$$\"3#******R$4 #yA(FA$!3^u\")4'\\OD#zF/7$$\"3D****\\Dxf([(FA$!3ZCT?6LCx$)F/7$$\"3'*** *\\(G^%*QxFA$!3\\u-3***z<#))F/7$$\"3#*****\\mN-=!)FA$!3o+Z$o7%4?$*F/7$ $\"36KLLbzyo#)FA$!3BR%G%pnjr(*F/7$$\"3j*****\\YKl`)FA$!3eTk^zXsD5FA7$$ \"34mmT&y[\"z()FA$!3xxe6IA+q5FA7$$\"3'3++q]#RW!*FA$!3Y')\\Ts#p'=6FA7$$ \"3qKL3yh'RH*FA$!3B%RL=kvY;\"FA7$$\"3'****\\ddU[b*FA$!3uyXo\")\\&H@\"F A7$$\"3KKLLQp*)4)*FA$!3cm>egXJg7FA7$$\"3++](=_\"p25!#<$!3[^82MN.58FA7$ $\"3!ommeb3M.\"F[x$!3G#)oycn-e8FA7$$\"3qmm^Pzqf5F[x$!3)=$)zn-$>29FA7$$ \"3TL$3qa*y&3\"F[x$!3&yD]J-=gX\"FA7$$\"31++SPev46F[x$!3l:P_3e#4]\"FA7$ $\"3HLLy5RAP6F[x$!3**3/>\"=ICb\"FA7$$\"3emm1$o\"zh6F[x$!3kx=6Lo^)f\"FA 7$$\"35+]Z_g)z=\"F[x$!3+Q!G\"pomZ;FA7$$\"3#***\\K1u087F[x$!3OWU&49:Zp \"FA7$$\"3**************R7F[x$!3n+,(3gw_u\"FA-%'COLOURG6&%$RGBG$\"#5! \"\"F(F(-%(SCALINGG6#%,CONSTRAINEDG-%+AXESLABELSG6$Q\"x6\"Q!Fj[l-%%VIE WG6$;F($\"++++S7!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 11 "" 1 "" {XPPMATH 20 "6#> %'y_at_LG$\"+,mFX$!3/Uy\"p +41?\"F-7$$\"3[LL$3%*zX0&F-$!3\"*4Cdkdj-AF-7$$\"3;nmmh%\\$*p(F-$!3%4Hl u\"[9$G$F-7$$\"3ymm;B];O5!#=$!33l+E9uHAVF-7$$\"3RLL3b(H6I\"F=$!3Edc1G3 G4`F-7$$\"3jmmTzfyY:F=$!3(o^&\\3u?$='F-7$$\"3&)***\\2x[6!=F=$!3\\=c6# \\et/(F-7$$\"3dmmTL6@k?F=$!31/D(R7x%)*yF-7$$\"3$)***\\<&)HkK#F=$!37RgS \"fF[q)F-7$$\"3OLLLMS:'f#F=$!3['ot]e!f\"\\*F-7$$\"3Tmm;TssLGF=$!3iEVAF W'\\,\"F=7$$\"3.+++.%y65$F=$!3?2\"=ZGM_3\"F=7$$\"3;+++XxspLF=$!3$ff<() [S=:\"F=7$$\"33+++(zC&GOF=$!3ts**y+vQ77F=7$$\"3tmmT8t`jQF=$!3V-()[n9Ok 7F=7$$\"3jLLLE**)H9%F=$!3km5P,faA8F=7$$\"3hLLLXHszVF=$!3];QQO7&)o8F=7$ $\"3y***\\Zs*4bYF=$!3`%fxu$4Q>9F=7$$\"3wKLLN[&))*[F=$!3:r*GzV57Y\"F=7$ $\"3i++vCGHm^F=$!3xdfw&4zS]\"F=7$$\"3?++DMq&4U&F=$!3eh&\\2]e?a\"F=7$$ \"38ML$3Usmo&F=$!3'*[T]=!Q)y:F=7$$\"3sLL3$4#oIfF=$!3\"H;OR'[95;F=7$$\" 3'fmm\"*[zQ>'F=$!3#fthR\"fOT;F=7$$\"3AmmT8wEnkF=$!3s.7i!**36n\"F=7$$\" 3T***\\#zFD0nF=$!3gm\"y)>U'[p\"F=7$$\"3fmm;yKGipF=$!3]W&GsQ$Q= BQz\"F=7$$\"36KLLbzyo#)F=$!3)[nAQAVs!=F=7$$\"3j*****\\YKl`)F=$!3ABfPk2 ))>=F=7$$\"34mmT&y[\"z()F=$!3+kL$\\h;*H=F=7$$\"3'3++q]#RW!*F=$!3*\\.)H -7XR=F=7$$\"3qKL3yh'RH*F=$!3#*RDtHu9Z=F=7$$\"3'****\\ddU[b*F=$!3EJ$)** fB(R&=F=7$$\"3KKLLQp*)4)*F=$!3>yo>*pQ&f=F=7$$\"3++](=_\"p25!#<$!3KW&o> h,V'=F=7$$\"3!ommeb3M.\"Fgw$!3e'e\"oMG'z'=F=7$$\"3qmm^Pzqf5Fgw$!3?!**R 'HK(3(=F=7$$\"3TL$3qa*y&3\"Fgw$!39,&ex\">.t=F=7$$\"31++SPev46Fgw$!3`i \"=y%oYu=F=7$$\"3HLLy5RAP6Fgw$!3M$pD?'Hdv=F=7$$\"3emm1$o\"zh6Fgw$!3Cud Vk1J1:kw=F=-%'COLOURG6&%$RGBG$\" #5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fb[l-%&TITLEG6#Q&slopeFb[l-%%VIEWG 6$;F($\"++++S7!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 188 120 120 {PLOTDATA 2 "6&-%'CURVESG6$7S7$$\"\"!F)$!3q******3$!3<0t!3H*[WVF,7$$\"3[LL$3%*zX0&F0$!3-9gT%yew<%F,7$$\"3 ;nmmh%\\$*p(F0$!3cFXEpC%R*RF,7$$\"3ymm;B];O5F,$!3kJ3$GT!=8QF,7$$\"3RLL 3b(H6I\"F,$!3%)4R%R_Luj$F,7$$\"3jmmTzfyY:F,$!3L%*eh+w>yMF,7$$\"3&)*** \\2x[6!=F,$!3S=>_5O2B)*e\\#=8?F,7$$\"3hLLLXHszVF,$!3 eHZ_M#*R**=F,7$$\"3y***\\Zs*4bYF,$!3D0X&oT17x\"F,7$$\"3wKLLN[&))*[F,$! 3Lq3#feq9m\"F,7$$\"3i++vCGHm^F,$!3?M.&\\')4^a\"F,7$$\"3?++DMq&4U&F,$!3 uTe,QIBQ9F,7$$\"38ML$3Usmo&F,$!3ws%e^B,3L\"F,7$$\"3sLL3$4#oIfF,$!3B>u, iz\"eB\"F,7$$\"3'fmm\"*[zQ>'F,$!3n%GW#fvIP6F,7$$\"3AmmT8wEnkF,$!3^mi19 YJR5F,7$$\"3T***\\#zFD0nF,$!3nys@<.0w&*F07$$\"3fmm;yKGipF,$!3Mk0>OW8J( )F07$$\"3#******R$4#yA(F,$!3QC_A([F#**yF07$$\"3D****\\Dxf([(F,$!3Awp&) )Rkc7(F07$$\"3'****\\(G^%*QxF,$!3Fzj\"R=P^T'F07$$\"3#*****\\mN-=!)F,$! 33#)y'\\iG*pcF07$$\"36KLLbzyo#)F,$!3\"H%3m#\\e&R]F07$$\"3j*****\\YKl`) F,$!3\"[e?5E(\\2WF07$$\"34mmT&y[\"z()F,$!3PNh`c#=8(QF07$$\"3'3++q]#RW! *F,$!3\"=]d5\\4\\K$F07$$\"3qKL3yh'RH*F,$!3ZLk>T2s[GF07$$\"3'****\\ddU[ b*F,$!37B)>AQ(G!R#F07$$\"3KKLLQp*)4)*F,$!3*>W1BIT4)>F07$$\"3++](=_\"p2 5!#<$!3+IG2Brb$f\"F07$$\"3!ommeb3M.\"Fiw$!36b$QE)eEg7F07$$\"3qmm^Pzqf5 Fiw$!3=)*>&Hm?#)f*!#?7$$\"3TL$3qa*y&3\"Fiw$!3X+nn&zp?-(Ffx7$$\"31++SPe v46Fiw$!3lEbrE[.4]Ffx7$$\"3HLLy5RAP6Fiw$!3$)o3hi`/>JFfx7$$\"3emm1$o\"z h6Fiw$!3>3&o`l1h!=Ffx7$$\"35+]Z_g)z=\"Fiw$!3i#z4B))=())z!#@7$$\"3#*** \\K1u087Fiw$!3^VzuiWYV@F`z7$$\"3**************R7Fiw$\"3Ebl:c9+k;!#G-%' COLOURG6&%$RGBG$\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fg[l-%&TITLEG6#Q /2nd~derivativeFg[l-%%VIEWG6$;F($\"++++S7!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}{PARA 13 "" 1 "" {GLPLOT2D 176 124 124 {PLOTDATA 2 "6&-%'CURVESG6$7S7$$\"\"!F)$\"3&* *****fv-IK(!#=7$$\"3\\mmm;r%Gq#!#>$\"3+b5'f8#QjrF,7$$\"3[LL$3%*zX0&F0$ \"3Y()>&z3(\\CqF,7$$\"3;nmmh%\\$*p(F0$\"3Dk?$fK1$ooF,7$$\"3ymm;B];O5F, $\"32ZV:I-36nF,7$$\"3RLL3b(H6I\"F,$\"3xaZc-9galF,7$$\"3jmmTzfyY:F,$\"3 w3]q)\\D&4kF,7$$\"3&)***\\2x[6!=F,$\"3WWDQ.yIfiF,7$$\"3dmmTL6@k?F,$\"3 n=9*zW_R5'F,7$$\"3$)***\\<&)HkK#F,$\"3)*4`>>`4\\fF,7$$\"3OLLLMS:'f#F,$ \"3bIy'ys0)*y&F,7$$\"3Tmm;TssLGF,$\"3=aM7pL]\\cF,7$$\"3.+++.%y65$F,$\" 3_v0qVhb\"\\&F,7$$\"3;+++XxspLF,$\"3g_[zr.'HL&F,7$$\"33+++(zC&GOF,$\"3 `\"y\"[eR7!=&F,7$$\"3tmmT8t`jQF,$\"3&oW.K&QLT]F,7$$\"3jLLLE**)H9%F,$\" 3b>6'R**)Hw[F,7$$\"3hLLLXHszVF,$\"3(>uC0#G\\OZF,7$$\"3y***\\Zs*4bYF,$ \"3,/r#[+lQd%F,7$$\"3wKLLN[&))*[F,$\"3E&z6<$=\"*HWF,7$$\"3i++vCGHm^F,$ \"3$*=PX&Qs>F%F,7$$\"3?++DMq&4U&F,$\"3u30>$ow:7%F,7$$\"38ML$3Usmo&F,$ \"3DnSUXXlkRF,7$$\"3sLL3$4#oIfF,$\"3qwY;P5b?QF,7$$\"3'fmm\"*[zQ>'F,$\" 3&>;*zNf6lOF,7$$\"3AmmT8wEnkF,$\"3H%z>(\\Dm.NF,7$$\"3T***\\#zFD0nF,$\" 3)4N;D!p6jLF,7$$\"3fmm;yKGipF,$\"303G;`PK6KF,7$$\"3#******R$4#yA(F,$\" 3TY-\"pd1X0$F,7$$\"3D****\\Dxf([(F,$\"3/ec*Rc\"4,HF,7$$\"3'****\\(G^%* QxF,$\"3n,ya]Yl_FF,7$$\"3#*****\\mN-=!)F,$\"3@#*['fwSye#F,7$$\"36KLLbz yo#)F,$\"3&**\\t-;[(RCF,7$$\"3j*****\\YKl`)F,$\"3wnT'RpF;G#F,7$$\"34mm T&y[\"z()F,$\"3oGd;]qMQ@F,7$$\"3'3++q]#RW!*F,$\"3)Ri;6Y.<)>F,7$$\"3qKL 3yh'RH*F,$\"3%)o!*z\\'\\-o\"F,7$$ \"3KKLLQp*)4)*F,$\"3?9A)o`B'H:F,7$$\"3++](=_\"p25!#<$\"3XF*ff&>$>P\"F, 7$$\"3!ommeb3M.\"Fiw$\"3C,GW@i0?7F,7$$\"3qmm^Pzqf5Fiw$\"3ph1+Z8uk5F,7$ $\"3TL$3qa*y&3\"Fiw$\"3w+pN\"eDr5*F07$$\"31++SPev46Fiw$\"31+'*zz4w\"p( F07$$\"3HLLy5RAP6Fiw$\"3U#e,EU$fpgF07$$\"3emm1$o\"zh6Fiw$\"31NQW@uq=YF 07$$\"35+]Z_g)z=\"Fiw$\"3d\"GD(H.wrIF07$$\"3#***\\K1u087Fiw$\"3U$R\\pd M6f\"F07$$\"3**************R7Fiw$!3OW&Q>\"z***f\"!#G-%'COLOURG6&%$RGBG $\"#5!\"\"F(F(-%+AXESLABELSG6$Q\"x6\"Q!Fe[l-%&TITLEG6#Q/3rd~derivative Fe[l-%%VIEWG6$;F($\"++++S7!\"*%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}} {MARK "4 0 0" 0 }{VIEWOPTS 1 1 0 3 4 1802 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }