mkrand n= 4 , seed= 13 mkrand n= 4 , A(1,1)= 1.017428003251553E-004 MKIDENT n= 4 1THE FULL MATRIX A OF ORDER 4 IS (PRINTED BY ROWS) A 1 1 1.017428003251553E-004 0.709991245530546 A 1 2 0.822869188152254 0.962451714556664 A 1 3 0.925974085927010 0.846469421871006 A 1 4 0.611580010503531 0.825241318903863 A 2 1 0.830853275489062 0.151007647160441 A 2 2 0.985527006909251 0.752412836533040 A 2 3 0.802549499087036 0.449437436647713 A 2 4 0.695001255255193 0.886102512944490 A 3 1 0.724941992666572 0.100076420698315 A 3 2 0.984403459355235 0.868949087336659 A 3 3 0.427317667752504 0.928045260254294 A 3 4 0.656696356832981 9.567443141713738E-002 A 4 1 1.695766113698483E-004 0.850074108224362 A 4 2 0.195543579757214 0.500946509651840 A 4 3 0.407991638872772 0.115477727726102 A 4 4 0.834170795977116 0.908574515487999 0THE FULL MATRIX B OF ORDER 4 IS (PRINTED BY ROWS) B 1 1 1.00000000000000 0.00000000000000 B 1 2 0.00000000000000 0.00000000000000 B 1 3 0.00000000000000 0.00000000000000 B 1 4 0.00000000000000 0.00000000000000 B 2 1 0.00000000000000 0.00000000000000 B 2 2 1.00000000000000 0.00000000000000 B 2 3 0.00000000000000 0.00000000000000 B 2 4 0.00000000000000 0.00000000000000 B 3 1 0.00000000000000 0.00000000000000 B 3 2 0.00000000000000 0.00000000000000 B 3 3 1.00000000000000 0.00000000000000 B 3 4 0.00000000000000 0.00000000000000 B 4 1 0.00000000000000 0.00000000000000 B 4 2 0.00000000000000 0.00000000000000 B 4 3 0.00000000000000 0.00000000000000 B 4 4 1.00000000000000 0.00000000000000 100 CONTINUE L= 1 100 CONTINUE L= 2 100 CONTINUE L= 3 150 CONTINUE, LB= 1 150 CONTINUE, LB= 2 160 CONTINUE, K= 1 150 CONTINUE, LB= 1 160 CONTINUE, K= 2 HESSENBERG RESULTS A 1 1 1.017428003251553E-004 0.709991245530546 A 1 2 1.53154596807073 -0.301325527154428 A 1 3 -1.20618994831573 -0.361079185974429 A 1 4 0.218488858962112 0.403706527352554 A 2 1 1.40403086712247 0.00000000000000 A 2 2 1.62922802001007 -1.30442541141442 A 2 3 -0.730892972290401 0.420626316181959 A 2 4 0.738523590535738 3.673464575338189E-002 A 3 1 0.00000000000000 0.00000000000000 A 3 2 0.971840003473054 0.00000000000000 A 3 3 -0.878123344673256 -0.549117301302622 A 3 4 0.254861729988971 0.207967444911310 A 4 1 0.00000000000000 0.00000000000000 A 4 2 0.00000000000000 0.00000000000000 A 4 3 1.00043800395395 0.00000000000000 A 4 4 -0.116316108129539 -0.311242411930035 B 1 1 1.00000000000000 0.00000000000000 B 1 2 0.00000000000000 0.00000000000000 B 1 3 0.00000000000000 0.00000000000000 B 1 4 0.00000000000000 0.00000000000000 B 2 1 0.00000000000000 0.00000000000000 B 2 2 1.994844994749850E-004 -0.999999980102967 B 2 3 -4.432033282265522E-017 -1.059915416816855E-017 B 2 4 5.016566112917263E-017 1.156280452151288E-017 B 3 1 0.00000000000000 0.00000000000000 B 3 2 0.00000000000000 0.00000000000000 B 3 3 -0.991097899129474 0.133135098081398 B 3 4 -7.128629284092192E-017 4.567201651595187E-017 B 4 1 0.00000000000000 0.00000000000000 B 4 2 0.00000000000000 0.00000000000000 B 4 3 0.00000000000000 0.00000000000000 B 4 4 -0.995569746367819 -9.402595448659927E-002 Z 1 1 1.00000000000000 0.00000000000000 Z 1 2 0.00000000000000 0.00000000000000 Z 1 3 0.00000000000000 0.00000000000000 Z 1 4 0.00000000000000 0.00000000000000 Z 2 1 0.00000000000000 0.00000000000000 Z 2 2 0.107670985051391 -0.591741360341593 Z 2 3 -0.194249152405242 -0.232136375655206 Z 2 4 0.739343689583305 0.00000000000000 Z 3 1 0.00000000000000 0.00000000000000 Z 3 2 7.138093310088499E-002 -0.516314869938292 Z 3 3 -0.601171118797809 0.109853234116539 Z 3 4 -0.547088685866617 0.235676134015552 Z 4 1 0.00000000000000 0.00000000000000 Z 4 2 0.605452590141785 0.00000000000000 Z 4 3 -2.777869597997332E-002 0.730844625631666 Z 4 4 0.133997164005744 -0.283842206805092 L= 1 ITS 0 GO TO 70, ITS,L,EN = 1 1 4 L= 1 ITS 1 GO TO 70, ITS,L,EN = 2 1 4 L= 1 ITS 2 GO TO 70, ITS,L,EN = 3 1 4 L= 1 ITS 3 GO TO 70, ITS,L,EN = 4 1 4 L= 1 ITS 4 GO TO 70, ITS,L,EN = 5 1 4 L= 1 ITS 5 GO TO 70, ITS,L,EN = 6 1 4 L= 4 GO TO 60, EN = 3 L= 1 ITS 0 GO TO 70, ITS,L,EN = 1 1 3 L= 1 ITS 1 GO TO 70, ITS,L,EN = 2 1 3 L= 1 ITS 2 GO TO 70, ITS,L,EN = 3 1 3 L= 3 GO TO 60, EN = 2 L= 1 ITS 0 GO TO 70, ITS,L,EN = 1 1 2 L= 2 GO TO 60, EN = 1 L= 1 GO TO 60, EN = 0 CQZVAL RESULTS A 1 1 2.47977246287788 2.40829161291591 A 1 2 4.092157467527197E-002 -0.880586862038468 A 1 3 0.129194492738016 0.148633874620412 A 1 4 0.340377873030182 0.686699368001927 A 2 1 0.00000000000000 0.00000000000000 A 2 2 0.518210640776618 0.307787725508139 A 2 3 0.115398318447666 0.451213451153438 A 2 4 -0.760921722918096 -0.216034592496170 A 3 1 0.00000000000000 0.00000000000000 A 3 2 0.00000000000000 0.00000000000000 A 3 3 -0.588596369585019 0.503121074217540 A 3 4 -0.605439400984334 -3.259922748539906E-002 A 4 1 0.00000000000000 0.00000000000000 A 4 2 0.00000000000000 0.00000000000000 A 4 3 0.00000000000000 0.00000000000000 A 4 4 -0.162269520630282 7.982344516428297E-002 B 1 1 1.00000000000000 0.00000000000000 B 1 2 4.951972807522264E-017 -1.052665106753796E-017 B 1 3 -8.599490441584108E-017 -2.650108941675238E-017 B 1 4 -9.579652547115065E-017 2.356767110126280E-018 B 2 1 0.00000000000000 0.00000000000000 B 2 2 1.00000000000000 0.00000000000000 B 2 3 -6.554847959346725E-017 -7.763158781321063E-017 B 2 4 -1.048799984082492E-016 -3.245027721162568E-018 B 3 1 0.00000000000000 0.00000000000000 B 3 2 0.00000000000000 0.00000000000000 B 3 3 1.00000000000000 0.00000000000000 B 3 4 7.432398204853049E-017 8.837465883318339E-017 B 4 1 6.094479289779585E-020 0.00000000000000 B 4 2 0.00000000000000 0.00000000000000 B 4 3 0.00000000000000 0.00000000000000 B 4 4 1.00000000000000 0.00000000000000 Z 1 1 0.154960876877329 -0.522744013867738 Z 1 2 2.984514186774697E-002 -6.060323322633068E-002 Z 1 3 -0.573528121055842 0.151439361444935 Z 1 4 -0.493098895125971 0.321165739177012 Z 2 1 -4.881016813255724E-002 -0.542004696521468 Z 2 2 -0.559934911303913 -0.162050862280874 Z 2 3 0.525301133133616 -0.162650379851790 Z 2 4 -0.205987383315189 -0.138685474907130 Z 3 1 -2.209914793782759E-002 -0.529610560955085 Z 3 2 0.375703055679018 -0.166848407032472 Z 3 3 -0.103452065781768 -0.440367321007012 Z 3 4 0.587666846697694 7.421211250069963E-003 Z 4 1 0.186019635910097 -0.301654231661908 Z 4 2 -0.134670832473671 0.684486317373501 Z 4 3 -0.123485253327503 0.354768759209640 Z 4 4 0.264987072835577 -0.420019093274554 ALFR(I) ALFI(I) BETA(I) 1 2.479772E+00 2.408292E+00 1.000000E+00 2 5.182106E-01 3.077877E-01 1.000000E+00 3 -5.885964E-01 5.031211E-01 1.000000E+00 4 -1.622695E-01 7.982345E-02 1.000000E+00 Z 1 1 0.284212694660973 -0.958761255054431 Z 1 2 0.268852987002000 -0.209528483803171 Z 1 3 -0.979127606446907 0.175050132012825 Z 1 4 0.135602684523484 0.558479210686344 Z 2 1 -8.952239875869492E-002 -0.994087142648368 Z 2 2 -0.682579173873915 -0.436811710878679 Z 2 3 0.674307722427159 9.268457351699430E-002 Z 2 4 -0.759514427010918 -0.650490457395246 Z 3 1 -4.053189754529826E-002 -0.971355142557122 Z 3 2 0.736757919607918 -0.431184549456200 Z 3 3 -0.345387998431678 -0.938459978123393 Z 3 4 0.703486816029030 0.399655723484795 Z 4 1 0.341177354228025 -0.553261983051280 Z 4 2 -4.324669265471241E-002 0.999064424136116 Z 4 3 0.229034172519637 0.566706303770859 Z 4 4 0.106555753985924 5.992014672355359E-002 COMPUTED EIGENVALUE AND EIGENVECTOR RESIDUAL 1 2.479772E+00 2.408292E+00 7.35E-17 2.842127E-01 -9.587613E-01 -8.952240E-02 -9.940871E-01 -4.053190E-02 -9.713551E-01 3.411774E-01 -5.532620E-01 2 5.182106E-01 3.077877E-01 1.72E-16 2.688530E-01 -2.095285E-01 -6.825792E-01 -4.368117E-01 7.367579E-01 -4.311845E-01 -4.324669E-02 9.990644E-01 3 -5.885964E-01 5.031211E-01 1.03E-16 -9.791276E-01 1.750501E-01 6.743077E-01 9.268457E-02 -3.453880E-01 -9.384600E-01 2.290342E-01 5.667063E-01 4 -1.622695E-01 7.982345E-02 1.58E-16 1.356027E-01 5.584792E-01 -7.595144E-01 -6.504905E-01 7.034868E-01 3.996557E-01 1.065558E-01 5.992015E-02 0END OF DATA FOR SUBROUTINE RMATIN(RSGREADI). 1