Powrót do listy plików
#include "lu.h"
main(int argc, char *argv[]){
//Pliki otwarte do czytania
FILE *skad_czytac_1;
FILE *skad_czytac_2;
FILE *skad_L;
//Pliki otwarte do pisania
FILE *wynikL;
FILE *wynikU;
if( (skad_czytac_1= fopen(argv[1], "r")) == NULL) {
printf("\n Nie moglem otworzyc pliku do czytania "); }
if( (skad_czytac_2= fopen(argv[2], "r")) == NULL) {
printf("\n Nie moglem otworzyc pliku do czytania "); }
if( (skad_L= fopen(argv[3], "r")) == NULL) {
printf("\n Nie moglem otworzyc pliku do czytania "); }
if( (wynikL= fopen(argv[4], "w")) == NULL) {
printf("\n Nie moglem otworzyc pliku do pisania "); }
if( (wynikU= fopen(argv[5], "w")) == NULL) {
printf("\n Nie moglem otworzyc pliku do pisania "); }
//deklaracja zmiennych;
int n_wierszy;
int n_wierszy2;
int n_kolumn;
int n_kolumn2,n_w,n_k;
int i, j;
typ **wsk_macierz_1 = NULL ; //wskaźnik do macierzy - nazwa pierwszej wczytanej macierzy
typ **wsk_macierz_2 = NULL ; //wskaźnik do macierzy - nazwa macierzy śledzenia permutacji wierszy
typ **L = NULL;
//wywolanie funkcji do wczytania ,macierzy;
wczytaj_macierz( skad_czytac_1, &wsk_macierz_1, &n_wierszy, &n_kolumn);
wczytaj_macierz( skad_czytac_2, &wsk_macierz_2, &n_wierszy2, &n_kolumn2);
wczytaj_macierz( skad_L, &L, &n_w, &n_k);
/*pivot*/
for(i=0;i<n_kolumn;i++){
for(j=0;j<80;j++) printf("=");
printf("\n[iii] bedzie pivot\n");
pivot(wsk_macierz_1, wsk_macierz_2, L, n_wierszy, n_kolumn, i);
printf("\n[iii] bedzie crout\n");
croutgauss(wsk_macierz_1,L,n_kolumn,i);
}
zapisz_macierz(wynikL,L,n_w,n_k);
zapisz_macierz(wynikU,wsk_macierz_1,n_wierszy,n_kolumn);
printf ("\n");
return 0;
}
syntax highlighted by
Code2HTML, v. 0.9.1
kod przerobiony z HTML na XHTML za pomocą HTML Tidy for Linux/x86
Materiały z Metod Numerycznych udostępnione zostały na zasadach licencji GPL w wersji 2.