M6R0
I(semidefR6$'%#A0G<$%'MatrixG%'matrixG'%"dG<&-%*identicalG6#%1positive_semidefG
-F.6#%1negative_semidefG-F.6#%-negative_defG-F.6#%-positive_defG60%"AG%"BG%"PG%
"iG%"jG%"nG%"tG%"sG%"rG%"RG%"QG%#QuG%#QiG%"SG6$%HMaple~Advisor~Database~1.01~fo
r~Maple~6G%gnCopyright~(c)~2000~by~Robert~B.~Israel.~~All~rights~reservedG6"C0>
8.-%'indetsG6$-%(convertG6$9$%)listlistG%%nameG>FO-%'removeG6$R6#FAFL6$%)operat
orG%&arrowGFL-%)assignedG6#&%0property/objectG6#FVFLFLFLFO>81-%$mapG6$R6#%"eG6#
%"fGFLFLC$-%'assumeG6$8$%%realG/FVF`pFLFLFLFO>F`p-%%map2G6%%%subsGFcoFV>Fco-Feo
6$RFhoFLFinFL/-%%evalG6#-%$rhsGFao-%$lhsGFaoFLFLFLFco@%-%%typeG6$F`pF)C%>8)-&%'
linalgG6#%'rowdimG6#F`p@$0Fjq-&F]r6#%'coldimGF`rYQ4Not~a~square~matrixFL>8%-%&e
valmG6#,&-&F]r6#%+htransposeGF`r"""F`p!""C%>Fjq-_%.LinearAlgebraG%-RowDimension
GF`r@$0Fjq-_Fis%0ColumnDimensionGF`rYQ4Not~a~square~MatrixFL>Fjr,&-_Fis%3Hermit
ianTransposeGF`rFcsF`pFds>Fjr-Feo6$%)simplifyGFjr?(8'FcsFcsFjq%%trueG?(8(FcsFcs
F\uF]u@$0&Fjr6$F\uF_u""!O%%FAILG@'-%'memberG6$9%<$.F3.F6@%Feq>8&-&F]r6#%)charpo
lyG6$F`p8*>Fav-_Fis%9CharacteristicPolynomialGFfvFeq>Fav*&)FdsFjqFcs-Fcv6$F`p,$
FgvFdsFcs>Fav-Fgp6$/8+Faw*&F^wFcs-Fjv6$F`pFfwFcs>8-%%NULLG@$-Fiu6$F[v<$F^v.F9C&
>Ffw-Fgp6$/FgvFduFav>Fav,&FavFcsFfwFds>8,-%#isG6#2FduFfw@&/Fjx%&falseG@%-F\y6#1
FfwFdu-%'RETURNG6#FayC$>F[x6$F[xF^y-%-additionallyGF]y/FjxFfuC$>F[xF[zF\z?&Ffw7
#-%'coeffsG6$-%(collectG6$FavFgvFgvF]uC%>Ffw-F^q6#Ffw>Fjx-F\y6#1FduFfw@&F`yC$@%
-F\y6#2FfwFduFfy>F[x6$F[xF`[l-F]zF_[lF^zC$>F[xFh[lFi[l@$/F[xF\x-Fgy6#F]u-Fgp6$F
co<#F[xFLFLFLFL