{VERSION 3 0 "IBM INTEL NT" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 } {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 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }1 0 0 0 8 4 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 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 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {SECT 1 {PARA 3 "" 0 "" {TEXT -1 14 "\277\254\275\300\271\256 \301\246 1-4-9" }}{PARA 0 "" 0 "" {TEXT -1 238 "\301\366\270\351\277 \241\274\255 2000ft\300\307 \260\355\265\265\267\316 \301\367\274\261 \300\270\267\316 \263\257\300\270\264\302 \272\361\307\340\261\342\260 \241 \307\321 \266\363\265\360\277\300 \271\346\274\333\261\271\300 \270\267\316\272\316\305\315 \263\262\302\312\300\270\267\316 8000ft \+ \266\263\276\356\301\370 \301\366\270\351\300\307 \307\321 \301\366 \301\241\260\372 \265\277\302\312\300\270\267\316 8000ft \266\263\276 \356\301\370 \266\307 \264\331\270\245 \301\366\301\241\300\273 \305 \353\260\372\307\317\260\355 \300\326\264\331. \300\314 \266\247 \272 \361\307\340\261\342\260\241 \266\363\265\360\277\300 \271\346\274\333 \261\271\300\270\267\316\272\316\305\315 \260\241\300\345 \260\241\261 \365\260\324 \265\307\264\302 \260\305\270\256\270\246 \261\270\307 \317\277\251\266\363." }}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 19 "\277 \254\275\300\271\256\301\246 1-4-9 \307\256\300\314" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 32 "Warning , new definition for norm" }}{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definition for trace" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "A: =[0,8000,2000]-[8000,0,2000];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"A G7%!%+!)\"%+!)\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "P:=[ 8000,0,2000];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"PG7%\"%+!)\"\"!\" %+?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "Q:=[0,0,0];" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"QG7%\"\"!F&F&" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "d:=nor m(crossprod(A,Q-P),2)/norm(A,2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% \"dG\"%+g" }}}}}{MARK "1 0 0" 19 }{VIEWOPTS 1 1 0 1 1 1803 }