{VERSION 6 0 "Windows XP" "6.0" } {USTYLETAB {PSTYLE "Heading 4" -1 20 1 {CSTYLE "" -1 -1 "Times" 1 10 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ord ered List 5" -1 200 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 144 2 0 2 2 -1 1 }{PSTYLE "Ordered List 1" -1 201 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Bullet Item" -1 15 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Lef t Justified Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Help" -1 10 1 {CSTYLE "" -1 -1 "Courier" 1 9 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Author" -1 19 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 8 8 2 0 2 0 2 2 -1 1 }{PSTYLE "Diagnostic" -1 9 1 {CSTYLE "" -1 -1 "Courier" 1 10 64 128 64 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Headi ng 2" -1 4 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 2 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 3" -1 202 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 72 2 0 2 2 -1 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Tim es" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Dash Item" -1 16 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 3" -1 5 1 {CSTYLE "" -1 -1 "Times " 1 12 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 } {PSTYLE "Ordered List 4" -1 203 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 108 2 0 2 2 -1 1 }{PSTYLE "Maple \+ Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Line Printed Output" -1 6 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "List Item" -1 14 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Fixed Width" -1 17 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 4 2 0 2 0 2 2 -1 1 }{PSTYLE "Title " -1 18 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 1 2 2 2 1 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 2" -1 204 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 36 2 0 2 2 -1 1 }{CSTYLE "2D Math Italic Small201205" -1 200 "Times " 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Variable" -1 25 "Cour ier" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Text" -1 201 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Bold" -1 39 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Page Number" -1 33 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small" -1 202 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Nonterminal" -1 24 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Default" -1 38 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Comment" -1 21 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input " -1 0 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "2D Math \+ Small" -1 7 "Times" 1 1 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Fix ed" -1 23 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Popup" -1 31 "Times" 1 12 0 128 128 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "Plot Titl e" -1 27 "Times" 1 10 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Input" -1 19 "Times" 1 12 255 0 0 1 2 2 2 2 1 2 0 0 0 1 }{CSTYLE "Copyright" -1 34 "Times" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input P laceholder" -1 203 "Courier" 1 12 200 0 200 1 2 1 2 2 1 2 0 0 0 1 } {CSTYLE "2D Math Bold Small" -1 10 "Times" 1 1 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small202" -1 204 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Notes" -1 37 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Bold" -1 41 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 0 0 0 1 }{CSTYLE "Hyperlink" -1 17 "Times" 1 12 0 128 128 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Symbol 2" -1 16 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Equation Label" -1 205 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small201204" -1 206 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Plot Text" -1 28 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small201" -1 207 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "He lp Italic" -1 42 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Ou tput Labels" -1 29 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "H elp Heading" -1 26 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE " Help Normal" -1 30 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE " 2D Comment" -1 18 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "H elp Maple Name" -1 35 "Times" 1 12 104 64 92 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "2D Output" -1 20 "Times" 1 12 0 0 255 1 2 2 2 2 2 2 0 0 0 1 } {CSTYLE "Dictionary Hyperlink" -1 45 "Times" 1 12 147 0 15 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Help Emphasized" -1 22 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Italic Bold" -1 40 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "LaTeX" -1 32 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Menus" -1 36 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Prompt" -1 1 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined" -1 44 "Times" 1 12 0 0 0 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Italic" -1 43 "Times" 1 12 0 0 0 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold" -1 5 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic" -1 3 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "restart; with(linalg ):" }}{PARA 7 "" 1 "" {TEXT 208 79 "Warning, the protected names norm \+ and trace have been redefined and unprotected" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "P:=matrix(1,2," }{MPLTEXT 1 0 62 "[1,r]); # line ar polynomial for C0 2 node line element (L2_C0)" }}{PARA 11 "" 1 "" {XPPMATH 20 "=6\"6$;\"\"\"F&;F&\"\"#E\\[l#6$F&F(I\"rGF#6$F&F&F&" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "# unit coordinate system, 0 \+ <= r <= 1, x(r) = x1 + r*L" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "dx_dr:=L: dr_dx:=1/dx_dr: r_i:=[0,1]; # local nodes" }}{PARA 11 "" 1 "" {XPPMATH 20 "7$\"\"!\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "G:=matrix(2,2,[[1, 0],[1, 1]]);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "G_inv:=evalm(inverse(G)); " }}{PARA 11 "" 1 "" {XPPMATH 20 "= 6\"6$;\"\"\"\"\"#F%E\\[l%6$F&F'\"\"!6$F'F'F&6$F'F&F&6$F&F&F&" }}{PARA 11 "" 1 "" {XPPMATH 20 "=6\"6$;\"\"\"\"\"#F%E\\[l%6$F&F'\"\"!6$F'F'F&6 $F'F&!\"\"6$F&F&F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "N:=li nalg[multiply](P,G_inv); # shape functions" }}{PARA 11 "" 1 "" {XPPMATH 20 "=6\"6$;\"\"\"F&;F&\"\"#E\\[l#6$F&F(I\"rGF#6$F&F&,&F&F&F+! \"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "Load := map(int,transpose(N), r = 0..1)* dx _dr;\n" }{MPLTEXT 1 0 40 "B:= map (diff,N,r) * dr_dx; # B is dN/dx" }} {PARA 11 "" 1 "" {XPPMATH 20 "*&=6\"6$;\"\"\"\"\"#;F'F'E\\[l#6$F(F'#F' F(6$F'F'F,F'I\"LGF$F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "*&=6\"6$;\"\"\" F';F'\"\"#E\\[l#6$F'F)F'6$F'F'!\"\"F'I\"LGF$F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "plot(\{seq(N[1,j],j=1..2)\},r=0..1,color=[red,b lue],\n" }{MPLTEXT 1 0 50 "thickness=2,title=\"Linear C^0 Shape Functi ons\");" }}{PARA 13 "" 1 "" {TEXT 209 0 "" }{GLPLOT2D 400 400 400 {PLOTDATA 2 "6(-%+AXESLABELSG6$Q\"r6\"Q!F'-%'CURVESG6$7S7$$\"\"!F/F.7$ $\"3emmm;arz@!#>F17$$\"3[LL$e9ui2%F3F57$$\"3nmmm\"z_\"4iF3F87$$\"3[mmm T&phN)F3F;7$$\"3CLLe*=)H\\5!#=F>7$$\"3gmm\"z/3uC\"F@FB7$$\"3%)***\\7LR DX\"F@FE7$$\"3]mm\"zR'ok;F@FH7$$\"3w***\\i5`h(=F@FK7$$\"3WLLL3En$4#F@F N7$$\"3qmm;/RE&G#F@FQ7$$\"3\")*****\\K]4]#F@FT7$$\"3$******\\PAvr#F@FW 7$$\"3)******\\nHi#HF@FZ7$$\"3jmm\"z*ev:JF@Fgn7$$\"3?LLL347TLF@Fjn7$$ \"3,LLLLY.KNF@F]o7$$\"3w***\\7o7Tv$F@F`o7$$\"3'GLLLQ*o]RF@Fco7$$\"3A++ D\"=lj;%F@Ffo7$$\"31++vV&RY2a F@Fhp7$$\"39mm;zXu9cF@F[q7$$\"3l******\\y))GeF@F^q7$$\"3'*)***\\i_QQgF @Faq7$$\"3@***\\7y%3TiF@Fdq7$$\"35****\\P![hY'F@Fgq7$$\"3kKLL$Qx$omF@F jq7$$\"3!)*****\\P+V)oF@F]r7$$\"3?mm\"zpe*zqF@F`r7$$\"3%)*****\\#\\'QH (F@Fcr7$$\"3GKLe9S8&\\(F@Ffr7$$\"3R***\\i?=bq(F@Fir7$$\"3\"HLL$3s?6zF@ F\\s7$$\"3a***\\7`Wl7)F@F_s7$$\"3#pmmm'*RRL)F@Fbs7$$\"3Qmm;a<.Y&)F@Fes 7$$\"3=LLe9tOc()F@Fhs7$$\"3u******\\Qk\\*)F@F[t7$$\"3CLL$3dg6<*F@F^t7$ $\"3ImmmmxGp$*F@Fat7$$\"3A++D\"oK0e*F@Fdt7$$\"3A++v=5s#y*F@Fgt7$$\"\" \"F/Fjt-%&COLORG6&%$RGBG$\"#5!\"\"$F/FbuFcu-F*6$7S7$F.Fjt7$F1$\"3!RLL$ e%G?y*F@7$F5$\"3OmmT&esBf*F@7$F8$\"3yKL$3s%3z$*F@7$F;$\"33LL$e/$Qk\"*F @7$F>$\"3!pm;/\"=q]*)F@7$FB$\"3'GL$3_>f_()F@7$FE$\"3))***\\(o1YZ&)F@7$ FH$\"30ML3-OJN$)F@7$FK$\"3p***\\P*o%Q7)F@7$FN$\"3ammm\"RFj!zF@7$FQ$\"3 JLL$e4OZr(F@7$FT$\"3=+++v'\\!*\\(F@7$FW$\"33+++DwZ#G(F@7$FZ$\"3[***** \\KqP2(F@7$Fgn$\"3OLL3-TC%)oF@7$Fjn$\"3Onmm\"4z)emF@7$F]o$\"3+nmmm`'zY 'F@7$F`o$\"3!3+](=t)eC'F@7$Fco$\"3qnmm;1J\\gF@7$Ffo$\"3y***\\(=[jLeF@7 $Fio$\"3\\++Dc/EGcF@7$F\\p$\"35nm;aQ(RT&F@7$F_p$\"3smmTg=><_F@7$Fbp$\" 3VLL$e*e$\\+&F@7$Fep$\"3;ML3-;Y%y%F@7$Fhp$\"3]++D\"3QDf%F@7$F[q$\"3'QL L3Ub_Q%F@7$F^q$\"3O+++]@6rTF@7$Faq$\"3/,+]PZhhRF@7$Fdq$\"3y++v=_\"*ePF @7$Fgq$\"3*3++D'>&Q`$F@7$Fjq$\"3Pnmm;EiJLF@7$F]r$\"3?+++D'*p:JF@7$F`r$ \"3zLL3-8/?HF@7$Fcr$\"3<+++v]81FF@7$Ffr$\"3snmT&)f'[]#F@7$Fir$\"3g++v$ z\"[%H#F@7$F\\s$\"33nmm\"z#z)3#F@7$F_s$\"3Y++voaXt=F@7$Fbs$\"33LLLL+1m ;F@7$Fes$\"3iLL$eCoRX\"F@7$Fhs$\"3$om;aoKOC\"F@7$F[t$\"3E+++]hN]5F@7$F ^t$\"3anmm\"H%R)G)F37$Fat$\"30PLLLB72jF37$Fdt$\"3i(***\\(=tY>%F37$Fgt$ \"3#y***\\7)*ys@F37$FjtF.-F]u6&F_uFcuFcuF`u-%&TITLEG6#Q;Linear~C^0~Sha pe~FunctionsF'-%%VIEWG6$;FcuF`u;$!\"#Fb_l$\"$-\"Fb_l-%*THICKNESSG6#\" \"#" 1 2 2 1 10 2 2 6 1 4 2 1.0 45.0 45.0 1 0 "Curve 1" "Curve 2" }} {TEXT 209 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "" "%#%?G" }} }} {MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }