N= 3 M= 3 N= 3 M= 3 1THE FULL MATRIX A OF ORDER 3 IS (PRINTED BY ROWS) 6. 0.I 12. 0.I 19. 0.I -9. 0.I -20. 0.I -33. 0.I 4. 0.I 9. 0.I 15. 0.I 0THE FULL MATRIX B OF ORDER 3 IS (PRINTED BY ROWS) 1. 0.I 0. 0.I 0. 0.I 0. 0.I 1. 0.I 0. 0.I 0. 0.I 0. 0.I 1. 0.I 100 CONTINUE L= 1 100 CONTINUE L= 2 150 CONTINUE, LB= 1 160 CONTINUE, K= 1 HESSENBERG RESULTS A 1 1 6.000000 -0.0000000 A 1 2 -3.249108 0.0000000 A 1 3 -22.23608 0.0000000 A 2 1 9.848858 0.0000000 A 2 2 -5.319588 0.0000000 A 2 3 -42.03093 -0.0000000 A 3 1 0.0000000 0.0000000 A 3 2 -0.03092785 0.0000000 A 3 3 0.3195875 0.0000000 B 1 1 1.000000 0.0000000 B 1 2 0.0000000 0.0000000 B 1 3 0.0000000 0.0000000 B 2 1 0.0000000 0.0000000 B 2 2 0.9999999 0.0000000 B 2 3 0.0000000 0.0000000 B 3 1 0.0000000 0.0000000 B 3 2 0.0000000 0.0000000 B 3 3 0.9999999 0.0000000 Z 1 1 1.000000 0.0000000 Z 1 2 0.0000000 0.0000000 Z 1 3 0.0000000 -0.0000000 Z 2 1 0.0000000 0.0000000 Z 2 2 -0.9138115 0.0000000 Z 2 3 -0.4061384 -0.0000000 Z 3 1 0.0000000 0.0000000 Z 3 2 0.4061384 0.0000000 Z 3 3 -0.9138115 -0.0000000 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= 1 ITS 3 GO TO 70, ITS,L,EN = 4 1 3 L= 1 ITS 4 GO TO 70, ITS,L,EN = 5 1 3 L= 1 ITS 5 GO TO 70, ITS,L,EN = 6 1 3 L= 1 ITS 6 GO TO 70, ITS,L,EN = 7 1 3 L= 1 ITS 7 GO TO 70, ITS,L,EN = 8 1 3 L= 1 ITS 8 GO TO 70, ITS,L,EN = 9 1 3 L= 1 ITS 9 GO TO 70, ITS,L,EN = 10 1 3 L= 3 GO TO 60, EN = 2 L= 2 GO TO 60, EN = 1 L= 1 GO TO 60, EN = 0 ALFR(I) ALFI(I) BETA(I) 1 -1.000001E+00 -3.376793E-08 1.000000E+00 2 1.000631E+00 1.525396E-06 1.000000E+00 3 9.993704E-01 -1.502231E-06 1.000000E+00 COMPUTED EIGENVALUE AND EIGENVECTOR RESIDUAL 1 -1.000000E+00 -3.376792E-08 3.57E-08 -3.475629E-01 3.224447E-01 5.958223E-01 -5.527625E-01 -2.482592E-01 2.303177E-01 2 1.000630E+00 1.525396E-06 3.65E-08 -2.229887E-01 3.421904E-01 4.457427E-01 -6.840225E-01 -2.228478E-01 3.419754E-01 3 9.993704E-01 -1.502231E-06 4.25E-08 -6.822759E-02 4.023183E-01 1.365280E-01 -8.050591E-01 -6.827123E-02 4.025718E-01 AC( 1 , 1 )= (6.00000000000000,0.000000000000000) AC( 1 , 2 )= (12.0000000000000,0.000000000000000) AC( 1 , 3 )= (19.0000000000000,0.000000000000000) AC( 2 , 1 )= (-9.00000000000000,0.000000000000000) AC( 2 , 2 )= (-20.0000000000000,0.000000000000000) AC( 2 , 3 )= (-33.0000000000000,0.000000000000000) AC( 3 , 1 )= (4.00000000000000,0.000000000000000) AC( 3 , 2 )= (9.00000000000000,0.000000000000000) AC( 3 , 3 )= (15.0000000000000,0.000000000000000) E( 1 )= (-1.00000023841858,-3.37679217921050E-8) V( 1 , 1 )= (-0.347562879323959,0.322444736957550) V( 1 , 2 )= (0.595822274684906,-0.552762508392334) V( 1 , 3 )= (-0.248259246349335,0.230317711830139) LENGTH = 1.00000001947554 E( 2 )= (1.00063025951385,0.00000152539575992705) V( 2 , 1 )= (-0.222988694906235,0.342190444469452) V( 2 , 2 )= (0.445742696523666,-0.684022545814514) V( 2 , 3 )= (-0.222847834229469,0.341975420713425) LENGTH = 0.999999999310917 E( 3 )= (0.999370396137238,-0.00000150223081618606) V( 3 , 1 )= (-0.0682275891304016,0.402318269014359) V( 3 , 2 )= (0.136527955532074,-0.805059134960175) V( 3 , 3 )= (-0.0682712271809578,0.402571797370911) LENGTH = 1.00000004971254 ERR AV-EV at( 1 )= (2.98023261019348E-7,-1.19209299111777E-7) ERR AV-EV at( 2 )= (5.93575147484583E-8,-9.01852641605199E-8) ERR AV-EV at( 3 )= (1.86001458221837E-8,-1.06402454553314E-7) V( 1 ) dot V( 2 )= -0.350662533000274 V( 1 ) dot V( 3 )= 0.164627890442188 V( 2 ) dot V( 3 )= -0.313965370478530 ILAMBDA= 1 (-1.00000023841858,-3.37679217921050E-8) SINGULARITY= 1 ILAMBDA= 2 (1.00063025951385,0.00000152539575992705) SINGULARITY= 1 ILAMBDA= 3 (0.999370396137238,-0.00000150223081618606) SINGULARITY= 1 TOTAL EIGENVECTOR ERROR = 0.0000124104922798945 N= 0 M= 0 END OF DATA FOR SUBROUTINE RMATIN