{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 "2D
 Math Italic Small202204208" -1 208 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 
0 0 1 }{CSTYLE "Output Labels" -1 29 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0
 0 0 1 }{CSTYLE "Help 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 "Help 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 "Time
s" 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 "2D Math Italic Small202204" 
-1 209 "Times" 1 1 0 0 0 1 1 2 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 Underlin
ed 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 41 "restart; with(linalg
): # for -1 <= a <= 1" }}{PARA 7 "" 1 "" {TEXT 210 79 "Warning, the pr
otected 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,a]); # linear polynomial for C0 2 node line element (L2_C0)" 
}}{PARA 11 "" 1 "" {XPPMATH 20 "=6\"6$;\"\"\"F&;F&\"\"#E\\[l#6$F&F(I\"
aGF#6$F&F&F&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "# natural c
oordinate system, -1 <= a <= 1, x(a) = x1+(a+1)*L/2" }}}{EXCHG {PARA 0
 "> " 0 "" {MPLTEXT 1 0 54 "dx_da:=L/2: da_dx:=1/dx_da: a_i:=[-1,1]; #
 local nodes" }}{PARA 11 "" 1 "" {XPPMATH 20 "7$!\"\"\"\"\"" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "G:=matrix(2,2,[[1, -1],[1, 1
]]); # P evaluated at each a_i" }}{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'#F&F'6$F'F'F*6$F'F&#!\"
\"F'6$F&F&F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "N:=linalg[m
ultiply](P,G_inv); # shape functions" }}{PARA 11 "" 1 "" {XPPMATH 20 "
=6\"6$;\"\"\"F&;F&\"\"#E\\[l#6$F&F(,&#F&F(F&*&F,F&I\"aGF#F&F&6$F&F&,&F
,F&F-!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "Load := map(int,transpose(N), a = -
1..1)* dx_da;\n" }{MPLTEXT 1 0 40 "B:= map (diff,N,a) * da_dx; # B is \+
dN/dx" }}{PARA 11 "" 1 "" {XPPMATH 20 ",$*(#\"\"\"\"\"#F%=6\"6$;F%F&;F
%F%E\\[l#6$F&F%F%6$F%F%F%F%I\"LGF(F%F%" }}{PARA 11 "" 1 "" {XPPMATH 20
 ",$*(\"\"#\"\"\"=6\"6$;F%F%;F%F$E\\[l#6$F%F$#F%F$6$F%F%#!\"\"F$F%I\"L
GF'F0F%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "plot(\{seq(N[1,j
],j=1..2)\},a=-1..1,color=[red,blue],\n" }{MPLTEXT 1 0 50 "thickness=2
,title=\"Linear C^0 Shape Functions\");" }}{PARA 13 "" 1 "" {TEXT 211 
0 "" }{GLPLOT2D 400 400 400 {PLOTDATA 2 "6(-%+AXESLABELSG6$Q\"a6\"Q!F'
-%'CURVESG6$7S7$$!\"\"\"\"!$\"\"\"F07$$!3ommm;p0k&*!#=$\"3!RLL$e%G?y*F
67$$!3wKL$3<XZ=*F6$\"3OmmT&esBf*F67$$!3mmmmT%p\"e()F6$\"3yKL$3s%3z$*F6
7$$!3:mmm\"4m(G$)F6$\"33LL$e/$Qk\"*F67$$!3\"QLL3i.9!zF6$\"3!pm;/\"=q]*
)F67$$!3\"ommT!R=0vF6$\"3'GL$3_>f_()F67$$!3u****\\P8#\\4(F6$\"3))***
\\(o1YZ&)F67$$!3+nm;/siqmF6$\"30ML3-OJN$)F67$$!3[++](y$pZiF6$\"3p***
\\P*o%Q7)F67$$!33LLL$yaE\"eF6$\"3ammm\"RFj!zF67$$!3hmmm\">s%HaF6$\"3JL
L$e4OZr(F67$$!3Q+++]$*4)*\\F6$\"3=+++v'\\!*\\(F67$$!39+++]_&\\c%F6$\"3
3+++DwZ#G(F67$$!31+++]1aZTF6$\"3[*****\\KqP2(F67$$!3umm;/#)[oPF6$\"3OL
L3-TC%)oF67$$!3hLLL$=exJ$F6$\"3Onmm\"4z)emF67$$!3*RLLLtIf$HF6$\"3+nmmm
`'zY'F67$$!3]++]PYx\"\\#F6$\"3!3+](=t)eC'F67$$!3EMLLL7i)4#F6$\"3qnmm;1
J\\gF67$$!3c****\\P'psm\"F6$\"3y***\\(=[jLeF67$$!3')****\\74_c7F6$\"3
\\++Dc/EGcF67$$!3)3LLL3x%z#)!#>$\"35nm;aQ(RT&F67$$!3KMLL3s$QM%Fjr$\"3s
mmTg=><_F67$$!3]^omm;zr)*!#@$\"3VLL$e*e$\\+&F67$$\"3%pJL$ezw5VFjr$\"3;
ML3-;Y%y%F67$$\"3s*)***\\PQ#\\\")Fjr$\"3]++D\"3QDf%F67$$\"3GKLLe\"*[H7
F6$\"3'QLL3Ub_Q%F67$$\"3I*******pvxl\"F6$\"3O+++]@6rTF67$$\"3#z****\\_
qn2#F6$\"3/,+]PZhhRF67$$\"3U)***\\i&p@[#F6$\"3y++v=_\"*ePF67$$\"3B)***
*\\2'HKHF6$\"3*3++D'>&Q`$F67$$\"3ElmmmZvOLF6$\"3Pnmm;EiJLF67$$\"3i****
**\\2goPF6$\"3?+++D'*p:JF67$$\"3UKL$eR<*fTF6$\"3zLL3-8/?HF67$$\"3m****
**\\)Hxe%F6$\"3<+++v]81FF67$$\"3ckm;H!o-*\\F6$\"3snmT&)f'[]#F67$$\"3y)
***\\7k.6aF6$\"3g++v$z\"[%H#F67$$\"3#emmmT9C#eF6$\"33nmm\"z#z)3#F67$$
\"33****\\i!*3`iF6$\"3Y++voaXt=F67$$\"3%QLLL$*zym'F6$\"33LLLL+1m;F67$$
\"3wKLL3N1#4(F6$\"3iLL$eCoRX\"F67$$\"3Nmm;HYt7vF6$\"3$om;aoKOC\"F67$$
\"3Y*******p(G**yF6$\"3E+++]hN]5F67$$\"3]mmmT6KU$)F6$\"3anmm\"H%R)G)Fj
r7$$\"3fKLLLbdQ()F6$\"30PLLLB72jFjr7$$\"3[++]i`1h\"*F6$\"3i(***\\(=tY>
%Fjr7$$\"3W++]P?Wl&*F6$\"3#y***\\7)*ys@Fjr7$F1$F0F0-%&COLORG6&%$RGBG$
\"#5F/$F0F/Fc[l-F*6$7S7$F.F\\[l7$F4$\"3emmm;arz@Fjr7$F:$\"3EOL$e9ui2%F
jr7$F?$\"3nmmm\"z_\"4iFjr7$FD$\"3EpmmT&phN)Fjr7$FI$\"35LLe*=)H\\5F67$F
N$\"3gmm\"z/3uC\"F67$FS$\"37++DJ$RDX\"F67$FX$\"3]mm\"zR'ok;F67$Fgn$\"3
w***\\i5`h(=F67$F\\o$\"3WLLL3En$4#F67$Fao$\"3qmm;/RE&G#F67$Ffo$\"3\")*
****\\K]4]#F67$F[p$\"3$******\\PAvr#F67$F`p$\"3)******\\nHi#HF67$Fep$
\"3jmm\"z*ev:JF67$Fjp$\"3?LLL347TLF67$F_q$\"3,LLLLY.KNF67$Fdq$\"3w***
\\7o7Tv$F67$Fiq$\"3'GLLLQ*o]RF67$F^r$\"3A++D\"=lj;%F67$Fcr$\"31++vV&R<
P%F67$Fhr$\"3WLL$e9Ege%F67$F^s$\"3GLLeR\"3Gy%F67$Fcs$\"3cmm;/T1&*\\F67
$Fis$\"3&em;zRQb@&F67$F^t$\"3\\***\\(=>Y2aF67$Fct$\"39mm;zXu9cF67$Fht$
\"3l******\\y))GeF67$F]u$\"3'*)***\\i_QQgF67$Fbu$\"3@***\\7y%3TiF67$Fg
u$\"35****\\P![hY'F67$F\\v$\"3kKLL$Qx$omF67$Fav$\"3!)*****\\P+V)oF67$F
fv$\"3?mm\"zpe*zqF67$F[w$\"3%)*****\\#\\'QH(F67$F`w$\"3GKLe9S8&\\(F67$
Few$\"3R***\\i?=bq(F67$Fjw$\"3\"HLL$3s?6zF67$F_x$\"3a***\\7`Wl7)F67$Fd
x$\"3#pmmm'*RRL)F67$Fix$\"3Qmm;a<.Y&)F67$F^y$\"3=LLe9tOc()F67$Fcy$\"3u
******\\Qk\\*)F67$Fhy$\"3CLL$3dg6<*F67$F]z$\"3ImmmmxGp$*F67$Fbz$\"3A++
D\"oK0e*F67$Fgz$\"3A++v=5s#y*F67$F1F1-F^[l6&F`[lFc[lFc[lFa[l-%&TITLEG6
#Q;Linear~C^0~Shape~FunctionsF'-%*THICKNESSG6#\"\"#-%%VIEWG6$;$!#5F/Fa
[l;$!\"#Fhel$\"$-\"Fhel" 1 2 2 1 10 2 2 6 1 4 2 1.0 45.0 45.0 1 0 "Cur
ve 1" "Curve 2" }}{TEXT 211 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 }