Examples                                                                       
     ______________________________________________________

     determination of eigenvalues by jacobi's method, where

        n      =    3
        itmax  =   50
        eps1   =    0.100E-09
        eps2   =    0.100E-09
        eps3   =    0.100E-04

     the starting matrix a(1,1)...a(n,n) is

         0.100E+01  0.000E+00  0.000E+00
         0.000E+00  0.200E+01  0.000E+00
         0.000E+00  0.000E+00  0.300E+01
       convergence has occured, where
       iter   =     1         s =  0.140E+02    sigma2 =  0.140E+02
     ____________________


     eigenvalues eigen(1)...eigen(n) are

         0.100E+01  0.200E+01  0.300E+01

     eignevectors are in corresponding columns of the following matrix

         0.100E+01  0.000E+00  0.000E+00
         0.000E+00  0.100E+01  0.000E+00
         0.000E+00  0.000E+00  0.100E+01

     corresonding angles (degrees)
          0.000000   0.000000   0.000000

     ______________________________________________________

     determination of eigenvalues by jacobi's method, where

        n      =    3
        itmax  =   50
        eps1   =    0.100E-09
        eps2   =    0.100E-09
        eps3   =    0.100E-04

     the starting matrix a(1,1)...a(n,n) is

         0.100E+01  0.000E+00  0.000E+00
         0.000E+00 -0.200E+01  0.000E+00
         0.000E+00  0.000E+00  0.300E+01
       convergence has occured, where
       iter   =     1         s =  0.140E+02    sigma2 =  0.140E+02
     ____________________


     eigenvalues eigen(1)...eigen(n) are

         0.100E+01 -0.200E+01  0.300E+01

     eignevectors are in corresponding columns of the following matrix

         0.100E+01  0.000E+00  0.000E+00
         0.000E+00  0.100E+01  0.000E+00
         0.000E+00  0.000E+00  0.100E+01

     corresonding angles (degrees)
          0.000000   0.000000   0.000000

     ______________________________________________________

     determination of eigenvalues by jacobi's method, where

        n      =    3
        itmax  =   50
        eps1   =    0.100E-09
        eps2   =    0.100E-09
        eps3   =    0.100E-04

     the starting matrix a(1,1)...a(n,n) is

         0.100E+01  0.000E+00  0.000E+00
         0.000E+00 -0.200E+01  0.000E+00
         0.000E+00  0.000E+00 -0.300E+01
       convergence has occured, where
       iter   =     1         s =  0.140E+02    sigma2 =  0.140E+02
     ____________________


     eigenvalues eigen(1)...eigen(n) are

         0.100E+01 -0.200E+01 -0.300E+01

     eignevectors are in corresponding columns of the following matrix

         0.100E+01  0.000E+00  0.000E+00
         0.000E+00  0.100E+01  0.000E+00
         0.000E+00  0.000E+00  0.100E+01

     corresonding angles (degrees)
          0.000000   0.000000   0.000000

     ______________________________________________________

     determination of eigenvalues by jacobi's method, where

        n      =    3
        itmax  =   50
        eps1   =    0.100E-09
        eps2   =    0.100E-09
        eps3   =    0.100E-04

     the starting matrix a(1,1)...a(n,n) is

        -0.690E+02 -0.740E+02  0.210E+02
        -0.740E+02 -0.180E+02 -0.410E+02
         0.210E+02 -0.410E+02  0.274E+03
       iter   =     1    sigma1 =  0.802E+05    sigma2 =  0.954E+05
       iter   =     2    sigma1 =  0.954E+05    sigma2 =  0.954E+05
       convergence has occured, where
       iter   =     3         s =  0.954E+05    sigma2 =  0.954E+05
     ____________________


     eigenvalues eigen(1)...eigen(n) are

        -0.122E+03  0.264E+02  0.282E+03

     eignevectors are in corresponding columns of the following matrix

         0.811E+00  0.578E+00  0.918E-01
         0.585E+00 -0.796E+00 -0.157E+00
         0.175E-01 -0.181E+00  0.983E+00

     corresonding angles (degrees)
         35.797536 142.748652  10.465577


  Maximum =  0.50000E+00  Minimum =  0.50000E+00  Scale Factor =  0.20000E+02

  x(1)= 0.00000E+00  y(1)= 0.00000E+00  z(1)= 0.00000E+00

  x(2)= 0.10000E+02  y(2)= 0.00000E+00  z(2)= 0.00000E+00

  x(3)= 0.00000E+00  y(3)= 0.00000E+00  z(3)=-0.10000E+02

  x(4)= 0.10000E+02  y(4)= 0.00000E+00  z(4)=-0.10000E+02