{VERSION 6 0 "IBM INTEL NT" "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 "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 2 6 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 2 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "M aple 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 "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 60 "read(\"K://www/cours es/LinAlgebra/Maple/RefPkg/InitPkg.mpl\");" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(libnameG6$QAK://www/courses/LinAlgebra/Maple6\"Q>C: \\Program~Files\\Maple~13/libF'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "with(RefPkg);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7*%$E_IG%%E_I IG%&E_IIIG%&MyDetG%*MyInverseG%(MySolveG%$RefG%%XRefG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "with(LinearAlgebra);" }}{PARA 12 " " 1 "" {XPPMATH 20 "6#7gr%#&xG%$AddG%(AdjointG%3BackwardSubstituteG%+B andMatrixG%&BasisG%-BezoutMatrixG%/BidiagonalFormG%-BilinearFormG%5Cha racteristicMatrixG%9CharacteristicPolynomialG%'ColumnG%0ColumnDimensio nG%0ColumnOperationG%,ColumnSpaceG%0CompanionMatrixG%0ConditionNumberG %/ConstantMatrixG%/ConstantVectorG%%CopyG%2CreatePermutationG%-CrossPr oductG%-DeleteColumnG%*DeleteRowG%,DeterminantG%)DiagonalG%/DiagonalMa trixG%*DimensionG%+DimensionsG%+DotProductG%6EigenConditionNumbersG%,E igenvaluesG%-EigenvectorsG%&EqualG%2ForwardSubstituteG%.FrobeniusFormG %4GaussianEliminationG%2GenerateEquationsG%/GenerateMatrixG%(GenericG% 2GetResultDataTypeG%/GetResultShapeG%5GivensRotationMatrixG%,GramSchmi dtG%-HankelMatrixG%,HermiteFormG%3HermitianTransposeG%/HessenbergFormG %.HilbertMatrixG%2HouseholderMatrixG%/IdentityMatrixG%2IntersectionBas isG%+IsDefiniteG%-IsOrthogonalG%*IsSimilarG%*IsUnitaryG%2JordanBlockMa trixG%+JordanFormG%1KroneckerProductG%(LA_MainG%0LUDecompositionG%-Lea stSquaresG%,LinearSolveG%.LyapunovSolveG%$MapG%%Map2G%*MatrixAddG%2Mat rixExponentialG%/MatrixFunctionG%.MatrixInverseG%5MatrixMatrixMultiply G%+MatrixNormG%,MatrixPowerG%5MatrixScalarMultiplyG%5MatrixVectorMulti plyG%2MinimalPolynomialG%&MinorG%(ModularG%)MultiplyG%,NoUserValueG%%N ormG%*NormalizeG%*NullSpaceG%3OuterProductMatrixG%*PermanentG%&PivotG% *PopovFormG%0QRDecompositionG%-RandomMatrixG%-RandomVectorG%%RankG%6Ra tionalCanonicalFormG%6ReducedRowEchelonFormG%$RowG%-RowDimensionG%-Row OperationG%)RowSpaceG%-ScalarMatrixG%/ScalarMultiplyG%-ScalarVectorG%* SchurFormG%/SingularValuesG%*SmithFormG%8StronglyConnectedBlocksG%*Sub MatrixG%*SubVectorG%)SumBasisG%0SylvesterMatrixG%/SylvesterSolveG%/Toe plitzMatrixG%&TraceG%*TransposeG%0TridiagonalFormG%+UnitVectorG%2Vande rmondeMatrixG%*VectorAddG%,VectorAngleG%5VectorMatrixMultiplyG%+Vector NormG%5VectorScalarMultiplyG%+ZeroMatrixG%+ZeroVectorG%$ZipG" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "?Ref" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "A := RandomMatrix(5,6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG-%'RTABLEG6%\"*;w5`\"-%'MATRIXG6#7'7(!#;!#\")!#)* !#w!\"%\"#H7(!\"*!#Q!#x!#s\"#F\"#W7(!#]!#=\"#d!\"#\"\")\"##*7(!#A\"#() F9!#K\"#p!#J7(\"#X\"#L!#$*!#u\"#**\"#n%'MatrixG" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 7 "Ref(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%3Se arching~column~1G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%%3Added~row~1~tim es~G#!\"*\"#;%*~to~row~2G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLE G6%\"*SBk_\"-%'MATRIXG6#7'7(!#;!#\")!#)*!#w!\"%\"#H7(\"\"!#\"$@\"\"#;# !$v\"\"\")#!$<\"\"\"%#\"$<\"F<#\"$V%F67(!#]!#=\"#d!\"#F9\"##*7(!#A\"#( )\"#F!#K\"#p!#J7(\"#X\"#L!#$*!#u\"#**\"#n%'MatrixG" }}{PARA 11 "" 1 " " {XPPMATH 20 "6%%3Added~row~1~times~G#!#D\"\")%*~to~row~3G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*SBk_\"-%'MATRIXG6#7'7(!#;!#\" )!#)*!#w!\"%\"#H7(\"\"!#\"$@\"\"#;#!$v\"\"\")#!$<\"\"\"%#\"$<\"F<#\"$V %F67(F3#\"%\")=F9#\"%`9F<#\"$r%\"\"##\"#TFH#\"#6F97(!#A\"#()\"#F!#K\"# p!#J7(\"#X\"#L!#$*!#u\"#**\"#n%'MatrixG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%%3Added~row~1~times~G#!#6\"\")%*~to~row~4G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*SBk_\"-%'MATRIXG6#7'7(!#;!#\")!#)*!#w!\" %\"#H7(\"\"!#\"$@\"\"#;#!$v\"\"\")#!$<\"\"\"%#\"$<\"F<#\"$V%F67(F3#\"% \")=F9#\"%`9F<#\"$r%\"\"##\"#TFH#\"#6F97(F3#\"%(e\"F9#\"$Z'F<#\"$X\"FH #\"$\\\"FH#!$n&F97(\"#X\"#L!#$*!#u\"#**\"#n%'MatrixG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%%3Added~row~1~times~G#\"#X\"#;%*~to~row~5G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*SBk_\"-%'MATRIXG6#7'7(!#;!#\" )!#)*!#w!\"%\"#H7(\"\"!#\"$@\"\"#;#!$v\"\"\")#!$<\"\"\"%#\"$<\"F<#\"$V %F67(F3#\"%\")=F9#\"%`9F<#\"$r%\"\"##\"#TFH#\"#6F97(F3#\"%(e\"F9#\"$Z' F<#\"$X\"FH#\"$\\\"FH#!$n&F97(F3#!%D?\"(h*e?#!)od\\GFV%'MatrixG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#- %'RTABLEG6%\"*SBk_\"-%'MATRIXG6#7'7(!#;!#\")!#)*!#w!\"%\"#H7(\"\"!#\"$ @\"\"#;#!$v\"\"\")#!$<\"\"\"%#\"$<\"F<#\"$V%F67(F3F3#\"&x9\"\"#6#\"&%f 7FD#!%y(*FD#!%a%*FD7(F3F3F3#\"(Az6%\"'Zi7#!(\"QW$)FN#!)]Y9CFN7(F3F3F3F 3#\")J>D?\"(h*e?#!)od\\GFV%'MatrixG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "GaussianElimination(A);" }}{PARA 6 "" 1 "" {TEXT -1 40 "LUDecomposition: initializing matrices" }}{PARA 6 "" 1 "" {TEXT -1 41 "LUDecomposition: starting row reduction" }}{PARA 6 "" 1 "" {TEXT -1 33 "LUDecomposition: reducing row 1" }}{PARA 6 "" 1 "" {TEXT -1 36 "LUDecomposition: looking for pivot" }}{PARA 6 "" 1 "" {TEXT -1 59 "LUDecomposition: found new row. Rank is 1. nulldim is 0" }}{PARA 6 "" 1 "" {TEXT -1 32 "LUDecomposition: reducing rows" } }{PARA 6 "" 1 "" {TEXT -1 33 "LUDecomposition: reducing row 2" }} {PARA 6 "" 1 "" {TEXT -1 36 "LUDecomposition: looking for pivot" }} {PARA 6 "" 1 "" {TEXT -1 59 "LUDecomposition: found new row. Rank i s 2. nulldim is 0" }}{PARA 6 "" 1 "" {TEXT -1 32 "LUDecomposition: \+ reducing rows" }}{PARA 6 "" 1 "" {TEXT -1 33 "LUDecomposition: reduc ing row 3" }}{PARA 6 "" 1 "" {TEXT -1 36 "LUDecomposition: looking f or pivot" }}{PARA 6 "" 1 "" {TEXT -1 59 "LUDecomposition: found new \+ row. Rank is 3. nulldim is 0" }}{PARA 6 "" 1 "" {TEXT -1 32 "LUDecom position: reducing rows" }}{PARA 6 "" 1 "" {TEXT -1 33 "LUDecomposit ion: reducing row 4" }}{PARA 6 "" 1 "" {TEXT -1 36 "LUDecomposition: looking for pivot" }}{PARA 6 "" 1 "" {TEXT -1 59 "LUDecomposition: \+ found new row. Rank is 4. nulldim is 0" }}{PARA 6 "" 1 "" {TEXT -1 32 "LUDecomposition: reducing rows" }}{PARA 6 "" 1 "" {TEXT -1 33 "LUDecomposition: reducing row 5" }}{PARA 6 "" 1 "" {TEXT -1 36 " LUDecomposition: looking for pivot" }}{PARA 6 "" 1 "" {TEXT -1 59 "L UDecomposition: found new row. Rank is 5. nulldim is 0" }}{PARA 6 "" 1 "" {TEXT -1 32 "LUDecomposition: reducing rows" }}{PARA 6 "" 1 "" {TEXT -1 33 "LUDecomposition: reducing row 6" }}{PARA 6 "" 1 "" {TEXT -1 36 "LUDecomposition: looking for pivot" }}{PARA 6 "" 1 "" {TEXT -1 37 "LUDecomposition: done row reduction" }}{PARA 6 "" 1 "" {TEXT -1 42 "LUDecomposition: generating pivot Matrix" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*gGk_\"-%'MATRIXG6#7'7(!#;!#\")!#) *!#w!\"%\"#H7(\"\"!#\"$@\"\"#;#!$v\"\"\")#!$<\"\"\"%#\"$<\"F<#\"$V%F67 (F3F3#\"&x9\"\"#6#\"&%f7FD#!%y(*FD#!%a%*FD7(F3F3F3#\"(Az6%\"'Zi7#!(\"Q W$)FN#!)]Y9CFN7(F3F3F3F3#\")J>D?\"(h*e?#!)od\\GFV%'MatrixG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "infolevel['RefPkg']:=10;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%*infolevelG6#%'RefPkgG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "infolevel['LinearAlgebra']:=10;" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>&%*infolevelG6#%.LinearAlgebraG\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "A_Tr:=Transpose(A);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%%A_TrG-%'RTABLEG6%\"*!QVE:-%'MATRIXG 6#7(7'!#;!\"*!#]!#A\"#X7'!#\")!#Q!#=\"#()\"#L7'!#)*!#x\"#d\"#F!#$*7'!# w!#s!\"#!#K!#u7'!\"%F=\"\")\"#p\"#**7'\"#H\"#W\"##*!#J\"#n%'MatrixG" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "Ref(A_Tr);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%3Searching~column~1G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%%3Added~row~1~times~G#!#\")\"#;%*~to~row~2G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*+Rk_\"-%'MATRIXG6#7(7'!#;!\"* !#]!#A\"#X7'\"\"!#\"$@\"\"#;#\"%\")=\"\")#\"%(e\"F8#!%\"\"%%*~to~row~4G" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*+Rk_\"-%'MATRIXG6#7(7'! #;!\"*!#]!#A\"#X7'\"\"!#\"$@\"\"#;#\"%\")=\"\")#\"%(e\"F8#!%D?\"(h*e?7'F2F2F2#!)]Y9CFH#\")9P'=\"FH%'MatrixG" }}{PARA 11 " " 1 "" {XPPMATH 20 "6%%3Added~row~4~times~G#\")DB27\"(h*e?%*~to~row~6G " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*+Rk_\"-%'MATRIXG6#7 (7'!#;!\"*!#]!#A\"#X7'\"\"!#\"$@\"\"#;#\"%\")=\"\")#\"%(e\"F8#!%D?\"(h*e?7'F2F2F2F2#!)od\\GFN%'MatrixG" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#%3Searching~column~5G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%%3Added~row~5~times~G#\"(C32%\"(LJ*G%*~to~row~6G" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*+Rk_\"-%'MATRIXG6#7(7'!#;!\"*!#]!#A \"#X7'\"\"!#\"$@\"\"#;#\"%\")=\"\")#\"%(e\"F8#!%D? \"(h*e?7'F2F2F2F2F2%'MatrixG" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTA BLEG6%\"*+Rk_\"-%'MATRIXG6#7(7'!#;!\"*!#]!#A\"#X7'\"\"!#\"$@\"\"#;#\"% \")=\"\")#\"%(e\"F8#!%D?\"(h*e?7'F2F2F2F2F2%'Matrix G" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "Transpose(%);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#-%'RTABLEG6%\"*?Wk_\"-%'MATRIXG6#7'7(! #;\"\"!F-F-F-F-7(!\"*#\"$@\"\"#;F-F-F-F-7(!#]#\"%\")=\"\")#\"&x9\"\"#6 F-F-F-7(!#A#\"%(e\"F7#\"&.!*)F1#\"(Az6%\"'Zi7F-F-7(\"#X#!%D?\"(h*e?F-%'MatrixG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "4 0 0" 0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }