blob: 9edd958764fe13619258b1ea7379de72de708bf0 [file] [log] [blame]
/************************************************************************/
/* author : Mikkel Damsgaard */
/* Kirsebaerhaven 85b */
/* */
/* DK-8520 Lystrup */
/* email mikdam@daimi.aau.dk */
/* */
/* files : */
/* Divsol.c QRfact.h Divsol.h Jacobi.c */
/* Jacobi.h Triang.c print.c MM.c */
/* Triang.h print.h MM.h QRfact.c */
/* main.c main.h */
/* */
/* It calculates the eigenvalues for 4 different matrixes. It does not */
/* take any input; those 4 matrixes are calculated by MakeMatrix */
/* function. Output is given as 4 files: val2, val3, val4, val5, that */
/* contains the eigenvalues for each of the matrixes. */
/* */
/************************************************************************/
#include "main.h"
#include "MM.h"
Matrix Trianglelise(Matrix A,int i);
void House(Matrix A,Vector v,int col,int sr,int er);
double norm(Matrix A,int col,int rs,int re);
double xty(Vector x,Vector y,int start,int end);